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SELECT SWITCH, IS TESTED BY THIS PR 


REQUIREMENTS 


EQUIPMENT 
POP-11 PROCESSOR 
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tthe” wei TROLLER TEST 
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4.3 CPERATOR ACTION 
A. C¢ of ue. CONTRO L R. TEST CABLE BETWEEN me § 
onthe Oe yes ee. bake enc TON 
1H NTO af HE PROCESSOR CONTROLLING 


we § KAS ESTING. 
o. suTTCH "USED FORTE elect’ SHLTCH ON THE DRIVE TO BE 
D g TING ADD 
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YCLE THE ORIVE UP 


TO THE ’°A/B’ POS . 
ADDRESS (200(8), 20418) OR 210(8)). 
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146 

142 3. LOADING PROCEDURES 

149 THE PROGRAM May BY THE ABSO R TAPE 

iso LOADER Ray BE LO C9 ated FROM bie APPROP! ATE MEDIA 

151 Loe OER ME AS ocya ED" XXDP” LOADE OE PROGRAM MAY NOT 

ibe BE INCLUDED rKXDP’ CHAIN 

14 

155 

156 4, STARTING PROCEDURES 

158 

169 4.1 STARTING ADDRESSES 

161 a. NORMAL STARTING ADDRESS PROGRAM IS LOCATION 

162 @). HIS egpRESS ALL ALLOWS THE OPERATOR 

163 0 fattber SOR RESELECT) THE THE DRIVE 10 BE 

164 TESTED. 

166 8. RESTART SIS LOCATION 200 (8). THE PROGRAM WILL 

162 USE Tee CoaREN DRIVE ADDRESS. 

169 c. CAN BE STARTED AT LOCATION 204 (8) TO ALLOW THE 

170 AOE RES oe THe RIL OR RHZO TO ANGED. 

172 4.2 UNIBUS 8 VECTOR ADDRESSES 
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201 INTO THE SWITCH REGISTER (OR THE *SOFTWARE’ SWITCH REGISTER, 
20e F Sane ON S.2). 

203 E. P 3 > 
50s 


me T arf 
By The DRIVE, TF AN RPOY, OR THE NUMBER OF THE ADDRESS PLUG TF 


ce ng Ab acta 
207 G. Gr E T rest TO BE RUN. (’CARRIAGE RETURN’ 
208 ’ Wl A: D RUN TS.) 
209 H. ED AT ANY TIME AND RESTARTED 
gi0 FROM POeATION S 
He 
sis S. OPERATING PROCEDURES 
16 
gi7 5.1 OPERATIONAL SWITCH SETTINGS 
219 WITH ALL SWITCHES SET TO ZERO, THE PROGRAM WILL TYPE 
ge0 ALL ERRORS AND CONTINUE TESTING. 
ece THE SWITCH SETTINGS ARE: 
ges SW<15>=1...HALT ON RROR 
226 eae ERROR TYPEOUTS 
227 1 T T ITERATIONS 
eee 5410) 21 TY BELL ON ERROR 
ge3 ee, ON E 
esi 5.2 ’SOFTWARE’ SWITCH REGISTER 
233 ON A SWITCHLESS PROCESSOR (I.E. AN 11734) 
234 The PROGRAN Hi Re THAT THE HARDWARE SWITCH REGISTER IS 
225 NO he * SWITCH REGISTER. THE 
236 ree AT LO ATION 176 (8). THE 
237 Bile 66 ROLLED THROUGH A KEYBOARD 
238 veING A °C G’. THE PRO OGRaM WILL 
239 REC ANY TIME EXCE 
240 tas ues Aone te THE 
241 soe CHER Paige D AS AN AL NUMBER IN RESPONSE 
eve 18 THE T FROM Pee Suit H ENTRY ROUTINE: 
Sie "SWR = NNNNNN NEW =’ 
e4e EACH TIME SWITCH SETTING ENTERED, THE ENTIRE SWITCH REGISTER 
247 AUST ENTERE nebe BOING ZEROS ARE NOT REQUIRED., "RUBOUT’ AND 
24a trou ROL Ue ial BE USED TO CORRECT TYPING ERRORS 
eu9 DURING TCH UNNTAY 
251 PROC SSORS_W SWITCH REGISTERS, THE *SOFTWARE’ SWITCH 
ete REGISTER. Re Sep IF Me PROGRAM FINDS ALL 16 SWITCHES IN THE 
252 a WITCH RE Is Te REFERENCES WILL BE TO THE 
2cy “SOFTHAR - Regt R AND THE PROCEDURES DESCRIBED ABOVE MUST 


BE FOLL 
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s.3 TEST SELECTION 


es 
23 TEST Bien SATE uate fe IN To TEGT ROMOER, 10. u* "ENTER 


EACH 


RY MUST 
5e3 Ret URN, CR) a, tHe" we ABD Pe TE ¥ Be _ 
ese TO RUN NT THER A °O’ FOLLOWED 
YA BY Ace RYace sRE TURN Uni ORB SAAR IBGE +R BY ITSELF. THE 
; UTE N SEQUENCE. 

QUT KEY’ (RO) aN vey TBreng ee THE LAST > 
nin E CHARACTE ‘y vious ACTER HAVE 
es at SPEIRS HT Yaoi 1 fSonbl tne 
553 TYPE. Hic RATOR. 

HE OPERATOR CA CAN DELETE AN ENTIRE ENTRY BY TYPING A 
"CN 


5.4 TEST CABLE CONNECTION 


“A THe Brod ‘ pA LER (Fre TEST oF rat * smantate 
ere eV aie i conect s on Aa $ fABZBUS 
Tide § 


rurururururururururu 
yitnt tet! Nw m 
Wh-OW0ONM” 


y 
ees el O OF EMENTED. 
287 WITH THE DR rae To te REY UNDER TEST 
zee THE tee SBUS: EACH PORT 
2289 ie rin ADDRESS. 
290 af Bats UPON THE Rasseus ADC S 
291 ios 8 ON THE 
292 
533 
29S TYPEOUT THE S OF BOTH 
ea: oe oon Ue fe caDSR HE DB eS he 
$37 OTHER PORT WILL HAE LOPED BY THE CABLE). 
$33 SESEEREESEEEREENEHSAHTNE MAGSOUS WHICH HAS AN ADDRESS. 

. 7 

301 * @ IN CONFL FEE RTH On THER MOP THE weagh ADORESSES MUST BE 
303 Bre Tar alares pend oeer erg 
305 TEST C ON TO T T WILL 
306 ag eng ha ribet ot THE DRIVE IF 
307 : 5" 
356 nae BF BY T ss seuR, aed ‘ 
310 Soha Prete ‘ Bd ok 0 ’BU IN’. 
312 WHEN THE DUAL PORT TEST CABLE IS CONNECTED, THE ATTENTION 
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313 BITS FOR PORTS AB 8 ASSERTED IN THE SAME BIT POSITION 
314 WHEN, RPAS (ATTENTION | RY REGISTER) TS_READ. THE ATTENTION 
3g HE ATEN $n Br THAT BPPEEIts He. ApORE IVE IS THE 
31; INCLUSIVE OR’ OF THE PORT A & PORT B A TENTION BITS. BECAUSE 
318 OF THIS, THE PROGRAM LOOKS AT ONLY THE ATTENTION BIT IN 
319 *RPOS’ [DRIVE STATUS REGISTER) TO DETERMINE THE STATE 
3ec OF THE SELECTED PORTS’S ATTENTION BIT. 

322 
323 
3c4 6 ERRORS 
| re I et ihre 
307 WHEN THE PR ENC TERS AN ERROR, THE ERROR ROUTINE IS 
328 CALLED AND SH 132 S NOT SET, THE ERROR MESSAGE PERTAINING 
329 TO THE ERROR WILL BE TYPED. EACH ERROR TYPEOUT WILL CONTAIN 
330 THE FOLLOWING: 
332 A. AN ERROR MES 
333 B- A DATA L 

4 : @ DATA L CONTAINING: 
335 1. THE TEST R 
336 2. THE PC (PROGRAM COUNTER VALUE) WHERE THE ERROR 
337 CALL Was 4 
338 3. CONTENTS OF THE APPROPIATE REGISTERS 
340 
341 
342 
343 ?. MISCELLANEOUS 
OM a ea ee ee 
34S 
346 7.1 RESTRICTIONS 
a 36 SMUT TE BRGER dt Fea Toe aug ve Uaben Tea 
200 MUST Mave be BGAL POR + T Race CENRE EYED 
35¢ 7.2 LIMITATIONS 
354 TH § PR Q0Es NOT TEST DATA TRANSFERS THROUGH EITHER 
cs P 3 NO ST THE YNAMTC oP RATION OF THE DUAL 
3 CONTROLL TION, AND DOES EST THE UNLOAD COMMAND 
3&7 OR THE OPERATION OF THE CONTROLLER SELECT SWITCH ON THE DRIVE. 
see (REFER TO PARAGRAPH 2.2 8 2.3) 
360 7.3 EXECUTION TIME 

z PA THE PROGRAM TAKES ABOUT 4S SECONDS. PASS 2 AND 
8 Coase dueNT P SSeS TAKE exe MINUTES. 
366 7.4 STACK POINTER 
367 ’ THE STACK IS INITIALLY SET TO 1100 AND EXTENDS DOWNWARD 
3té IN MEMORY. 
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7.8 SUBROUTINE CALLS 
THE SUBROUTINE CALLS USED BY THE PROGRAM ARE: 
A. ~. ™ L19t NSTRUCTION). THIS CALL IS PLE BE TWEE 


EO BETWEEN 
pe" TEE rio Se SAT HSL ot SR Routing eS saet sere 


8. noe oT ge ON). Ma wor IS _ USED TO REPORT ALL 
3 : a3 eg S FOLLOWED BY_A NUMBER WHICH IDENTIFIES 
Ss WHICH WILL BE v TYPED. 


fan 


ne, we INSTRUCTION IS USED FOR THE FOLLOWING SUBROUTINE 


Typoc = tT TTY TYPE ur ROUT Me 


M ‘ F ; AH Ee BOARD 
Ble 
] g-"Rourine Yo" Save FO" RS 


7.6 REQUIRED TESTS 


gee 
DDD 
08 


=" 
terete 


IF THE PROGRAM IS BEI I MODE, THE 
OPERATOR MUST CALL AND RUN THE FOL FORE OTHER 
TESTS ARE RUN: 


BE 
A. TEST 2 AND rest 2 THESE TESTS DETERMINE AND STORE FOR 
a ER pont. THE TIMEOUT NON-SHOT VALUE MEASURED THROUGH 


B. TES AND TES T TESTS SET ‘VV-A’ AND ‘VV-B" 
RESPEC CTIVLY. THESE Tests MUST PERFORMED AT LEASE ONCE 
BEF TESTS & - 46 ARE RU 

7.7 DISK SURFACE USAGE 

THIS DI TIC DOES NOT USE THE DISK SURFACE. HOWEVER 

DRIVE MUST CYCLED UP AND BE ON LINE FOR THE otocnosttc He BE 
7.8 TEST ITERATIONS 

EACH TEST 1s PERFORMED ONCE ON THE FI IRst PASS THROUGH THE 

PROGRAM THE SEC OND ese Que PASSES THROUGH THE 

PROGRAM, EgcH T ST IS PERFORMED THE POLL OUTNe NUMBER OF 


ITERATION COUNT 
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4 TEST NO. (IN DECIMAL) 
my £4 01 . 
458 ne 1 
430 04 1 
431 os 1 
432 0 4000 
433 0 4000 
434 10 109 
435 ll 100 
436 1g 4090 
437 1 yy 
438 14 4 
433 1S 4 
440 16 4000 
441 17 4000 
we 20 4006 
443 21 4000 
ooo 22 4000 
445 23 4000 
446 4 4000 
447 2s 4009 
448 e€ a 
44g “ 4000 
450 0 4000 
451 31 4 
452 3e Y 
43 33 4000 
454 34 4090 
435 35 4 
4SE 36 eB 
45? 37 “ 
4EE 40 
459 4 4009 
sof a5 4000 
4Ee 44 4099 
463 45 
2 on 
46E IF AN ERROR OCCURS IN A TEST, THAT TEST WILL BSE PERFORMED 
467 ONLY ONCE. THE OCCURENCE OF AN ERROR FORCES THE ITERATION 
wee COUNT TO *1’. 
470 TEST PERFORMED IN THE SINGLE TEST MODE WILL BE ITERATED 
47 THE NUMBER OF TIMES SPECIFIED BY THE ITERATION COUNT FOR 
47 THE TEST. 
um 7.9 LOOP ON ERROR OPTION 
47 IF WILL LOOP ON A FAILING TEST 
~ ONT eit ; aie suttch” ¢ a set bR THE ERROR ST OCCURING. 
478 EC THE RPOS TO A KNOWN STAT 
473 BEF ORE LOOPING. ON THE ER oR THE TEST FOR SW<O9> IS PERFORMED 
480 AT THE E TEST - NOT AT THE POINT WHERE THE E 
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WAS DETECTED. 
7.10 SPECIAL M777S *OP’ BOARD TESTS 
ONTA STS FOR T *DP’ BOARD 
FRPP SOUTEICG Gn SESATG DF Tse” RSIGIZOUN O28 
Fore ARE te’ Tet SEQUENCE AND MUST 
Bee uff ED BY THE OPERATOR. THE TESTS ARE TEST 4S AND TEST YE. 


8. TEST DESCRIPTIONS 


8.1 METHOD USED TO VERIFY THAT THE DRIVE IS IN NEUTRAL 





yom THAT THE OR IN Reps] THROUGH BY CHECKING 
: a Me NBR VE rors ta Ter 
BO ROENT BIT BITS 
(’ ara’ e » He ats Status > 
THROUGH” iy Sie \ US IS “AOL 
RPOSL) . THE Prot 25809 

ORIVE IS a REUTRAL 


S THA 
Sill PORTS INDICATES A 


exis 
That IN T a 


8.2 METHOD USED TO VERIFY THAT THE DRIVE HAS BEEN SEIZED 


.. pte rent ria: BEEN SEIZED BY 
vSeIZING 4} He 1s 
nF Timo OND Here 
pea Pind Feds 
THE i T), THE CONCLUDES 
BEEN BY’ THE SPECIFIED PORT. 
8.3 TEST 1 - DRIVE ACCESS TEST 
VERIFY THAT THE ORIVE CAN BE ACCESSED THROUGH BOTH PORTS 


" BRIVE 15°A GOAL PORT RPO4/S76, THAT THE DRIVE tS ONLINE. <RPDSI HAS 
NUMBER READ THROUGH’ BOTH Seer g? 18 Fhe Sane. Tne® The Derve” Sear 


8. THE TEST IS REPEATED THROUGH BOTH PORTS. 

8.4 TEST 2 - PORT 'A’ SEIZE/TIMEOUT TEST 
VERIFY THAT THE DRIVE CAN BE SEIZED AND THAT THE PORT TIMEOUT RELEASES 
THE DRIVE. 





x 2 
tees 
HE DRIVE 


O RPOS1 THROUGH PORT °A’; VERIFY THAT THE ORIVE 


A. WRIT T 
ZED. 


— 0’S IN 
HAS BEEN SEI 


I 
SE 


LOl 
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XCEPT RPCS1, THROUGH PORT ‘8’; 
538 : SERGEY depos yt Ree ReaD’ FROM EACH RedtsteR: 
40 Cc. WAIT F T yak a TO rfrgour "ne SHOT ano DRIVE. 
42 + on Mea VERIFY T TIMEOUT wit SAVE, THe DRIVE TO 
43 NEU 
de 8.5 TEST 3 - PORT 'B’ SEIZE/TIMEOUT TEST 
4 VERIFY THAT THE DRIVE CAN BE SEIZED AND THAT THE PORT TIMEOUT RELEASES 
ye THE ORIVE. 
5 A. WRITE O° S_INTO APOSI THROUGH PORT °B’; VERIFY THAT THE DRIVE 
ee 
T XCEPT THROUGH PORT ’A’; 
ssi oll SERtFY rears ARE READ AD’ F Re ACH REGISTER, 
T VE. 
Bee c. Wa TF ea Occur RELEASE HE DRIVE 
558 Cray LATER VERIFY + TIMEOUT RETURNED THE ORIVE TO 
e3 a Bore 
ee) 8.6 TEST 4 - PORT ’A’ COMMAND SEIZE TEST & SET ‘VV-A 
Bes VERIFY THAT THE HE DRIVE. 8 SEIZED WHEN A COMMAND IS ISSUED. SET ‘vv’ 
an 
56s 
OMMAND THROUGH TA’. RIFY THAT THE 
ee? ™ baIvE hase ie SEB Gy PORT *A’ AND HDT THE ‘60° “BIT T RESET 
A’ RIFY THAT THE 
a e. vn ai TN ORES PORT on? Ane Yaar’ tH T THE E Wi Bl tas NOT SET 
571 
'g’ ’vV’ BIT NOT T FOR PORT 
55 FOF PORT ney’ Be TESFED THE FIRST TIME THROUGH THE PROGRAM. 
74 
RIFY THAT THE PORT TIMEOUT RELEASED 
ee et tne Brive Ene ee Fue BRIVE RETURNED TO NEUTRAL. 
578 8.7 TEST 5 - PORT °B’ COMMAND SEIZE TEST & SET ’VV-B’ 
2 LJ ay? 
Seo VERIFY THAT THE HE DRIVE ts 1S SEIZED WHEN A COMMAND IS ISSUED. SET ‘VV 
e61 FOR THE PORT 
PEs A. AR C THR PORT 'B’. VERIFY THAT THE 
ees baive hae ar ez Tes BY Bont i? Og! BAS THAT TEH 'GO’ BIT RESET 
566 8. ISSUE A READIN PRESET co MAND THROUGH PORT °B’. ‘YERIFY THAT THE 
Be THAT THE PORT TIMEOUT RELEASED 
560 © SHE “BRIGE BNS°SRE THE DRIVE RETURNED TO NEUTRAL. 
Egi 


E92 8.2 TEST 6 - TEST RELEASE, DRIVE SEIZED BY PORT ‘A’ 
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TEST THE OPERATION OF THE RELEASE COMMAND, DRIVE SEIZED 
A. SEIZE THE DRIVE THROUGH PORT ’A’ BY WRITING O’S INTO RPDS!. 


T A’ RIFY THAT T IVE 
AUR out aint HHO ERRORS are’Y ICATED BY *'s 
TEST 7 - TEST RELEASE, DRIVE SEIZED BY PORT ’B’ 
TEST THE OPERATION OF THE RELEASE COMMAND, ORIVE SEIZED 
A. SEIZE THE DRIVE THROUGH PORT ’B’ BY WRITING O’S INTO RPOS1. 
B. ISSUE A RELEASE COMMAND THROUGH PORT ’8’. VERIFY THAT THE ORIVE 
RE TURNED TO NEUTRAL, AND THAT NO ERRORS ARE INDICATED BY THE 
TEST 10 - TEST RELEASE THROUGH PORT ’A’, DRIVE IN NEUTRAL 


TEST OPERATION OF RELEASE COMMAND, DRIVE IN NEUTRAL 


A. ISSUE A hes ig Coreen THROUGH PORT 'A’ WITH THE DRIVE IN 
NEUTRAL; VERIFY THAT THE DRIVE REMAINS IN NEUTRAL. 


TEST 11 - TEST RELEASE THROUGH PORT 'B’, DRIVE IN NEUTRAL 
TEST OPERATION OF RELEASE COMMAND, DRIVE IN NEUTRAL 
ISSUE A RE OMMAND here PORT 'B’ WITH THE DRIVE IN 
* REUTRAL 5 OERIPY Far THE ORIVE REMAINS IN NEUTRAL. 
TEST 12 - TEST THAT *CLEAR’ DOES NOT CAUSE RELEASE FROM PORT ’°A’ 
VERIFY THAT A LEAR OR DRIVE CLEAR WILL NOT CAUSE THE SEIZING 
PORT TO RELEASE TRE DRIVE. 


SEIZE THE ORIVE BY RITING O'S INTO RPDSL THROUGH PORT "A". 


8. A_DRIVE mun PORT ’A’ AND VERIFY THAT THE DRIVE 
B3ES* nor RETURN 


Cc. iSeut or natn cueee Tao yreouan THE RH11 AND VERIFY THAT THE DRIVE 


D. RELEASE THE ORIVE THROUGH PORT ’A’. VERIFY THAT THE DRIVE 
RETURNED TO NEUTRAL AND THAT NEITHER ATTENTION BIT IS SET. 


TEST 13 - TEST THAT 'CLEAR’ DOES NOT CAUSE RELEASE FROM PORT ’B’ 


VERIFY THAT A SBUS CLEAR OR DRIVE CLEAR WILL NOT CAUSE THE SEIZING 
PORT TO RELEASE THE DRIVE. 


f. SEIZE THE ORIVE BY WRITING 0’S INTO RPDS! THROUGH PORT °B’. 


SEG O0le 


NO1 
T G ( a —~ © $ 
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VERIFY THAT THE DRIVE WAS BEEN SEIZED. 


8. ge tie CL 7 muh” PORT ’'B’ AND VERIFY THAT THE DRIVE 


c. THROUGH THE RHi1l AND VERIFY THAT THE OR 
bee” NOT RETURN SOME UTRAL = 
D. E THE DRIVE T T ’s’ RIFY THAT THE DRIVE 
REY DT per Eal Ae THAT” NEITHER see ht ron BIT Is eazy 
TEST 14 - TEST RESET ATTENTION ’A’ BY MASSBUS CLEAR 
VERIFY THAT A MASSBUS INITIALIZE CLEARS ONLY THE ATTENTION BIT OF THE 
IZING PORT. 


EREESECERIORT SS | 
@ 


3 


aE} EACH PORT ’S ATTENTION BIT. VERIFY THAT BOTH ATTENTION BITS 


3 32 


B. SEIZE THE DRIVE THROUGH PORT 'A’ BY WRITING O'S INTO RPDS1. 


66 
£70 C. ISSUE A MASSBUS CLEAR. 
p53 D sPRLVE THROUGH PORT ’A’. VER FY THAT THE ATTENTION 
673 HAS BEEN CLEARED AND ATTENTION BIT FOR PORT 
Pe TILL SET. 
678 @.15 TEST 15 - dat RESET ATTENTION 'B’ BY MASSBUS CLEAR 
678 VERIFY THAT A MASSBUS INITIALIZE CLEARS ONLY THE ATTENTION BIT OF THE 
623 SEIZING PORT. 
p81 A. Set EACH PORT’S ATTENTION BIT. VERIFY THAT BOTH ATTENTION BITS 
683 P 
oe B. SEIZE THE DRIVE THROUGH PORT °B’ BY WRITING O’S INTO RPDS1. 
bat C. ISSUE A MASSBUS CLEAR. 
638 D. RELEASE THE OR THROUGH PORT ’B’. VERIFY THAT THE ATTENTION 
229 BIT FOR PORT i HAS BEEN OO EARED AND THE ATTENTION BIT FOR PORT 
p30 STILL SET. 
63 : 8.16 TEST 16 - TEST CLEAR ATTENTION BY MASSBUS INIT - ORIVE IN NEUTRAL 
695 VERIFY THAT MASSBUS CLEAR DOES NOT RESET ATTENTION BITS WHEN THE 
635 DRIVE IS IN NEUTRAL. 
£97 A. SET THE ATTENTION BITS FOR BOTH PORTS. 
33 B. VERIFY THAT THE DRIVE IS IN NEUTRAL. 

c 


Jesus A MASSBUS INIT. VERIFY THAT NEITHER ATTENTION SIT HAS 


704 8.17 TEST 17 - TEST SEIZE BY RPCS1 READ THROUGH PORT ‘A’ 


B0e 
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“a VERIFY THAT READING THE CONTROL REGISTER (RPCS1) SEIZES THE DRIVE. 
708 A. READ onte CONTROL ZPEGISTER (RPCS1) THROUGH PORT ‘A’; VERIFY THAT 
>i0 : 
711 A T ra’ RIFY THAT THE DRIVE 
zig RETURNED TO NELTRAL AND THAT NEITHER ATTENTION BIT Ts SET. 
a 8.18 TEST 20 - TEST SEIZE BY RPCS1 READ THROUGH PORT ’B° 
¢ 
716 VERIFY THAT READING THE CONTROL REGISTER (RPCSi) SEIZES THE DRIVE. 
71g A. READ ont CONTRO: ZBEGISTER (RPCS1) THROUGH PORT '8’; VERIFY THAT 
720 ‘ 
721 A RELE T RIFY THAT THE DRIVE 
og6 RETURNED TO NEUTRAL AND THAT NEITHER ATTENTION BIT TS SCT. 
re 8.19 TEST 21 - TEST ’PORT REQUEST’ FROM PORT ’A° 
726 RIFY THAT WRITING TER SETS ‘PORT REQUEST’ WHEN THE 
ce ORIUE 1S CErSED Byrh THE OBER PORT. 
72s A. SEIZE THE DRIVE THROUGH PORT °B’ BY WRITING 0’S INTO RPDS. 
7 B. WRITE 07s T REDS! FROM PORT 'A’; VERIFY THAT THE DRIVE IS STILL 
73 
734 C. ISSUE A RELEASE COMMAND FROM PORT *B” VERIFY THAT THE DRIVE 
33 RRP PORT wot Ser “ES RIFY TH THAT SHE ATTENTION BIT IS SET FOR 
737 ‘ 
738 A ’Q’ AND VERIFY THAT THE DRIVE 
239 -  BPSUENED RISE REU TRA. AND THATCNE THAT NEITHER ATTENTION BIT IS SET. 
rai 2.20 TEST 22 - TEST PORT REQUEST FROM PORT ‘B’ 
oy TING TER SETS *PORT T’ NT 
re BET SESE A Re BRR SETS “PORT REGUS? EN Te 
og A. SEIZE THE DRIVE THROUGH PORT 'A’ BY WRITING O’S INTO RPDS. 
o4e B. WRITE 0:5 iNT RPOS1 FROM PORT °6"; VERIFY THAT THE DRIVE IS STILL 
750 ; 
751 C. ISSUE @ RELEASE COMMAND FROM PORT. *A” VERIFY THAT THE 
a sufyevep 10 PORT * oF ge’ FRA Bon THAT ait A ATTENTION BIT 15 Seo FOR 
754 
755 D. A RELE VERIFY THAT THE DRIVE 
a RESURNED TO NEU TRAC ND TheeURe THA RET TOER R ATTENTION BIT IS SE 
758 8.21 TEST 23 - TEST NO ’PORT REQUEST’ WHEN READ RPCS1 THROUGH PORT ‘A’ 


760 VERIFY THAT READING THE CONTROL REGISTER (RPCS1) DOES NOT SET ‘PORT 
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8.22 


8.23 


8.24 


REQUEST’. 


- SEIZE Ie DRIVE THROUGH PORT "B" BY READING RPCS1. VERIFY THAT 


REO THE CONTROL REGISTER FROM PORT ’A’. VERIFY THAT 'DVA’ IS NOT 


E THR PORT ’B’ RIFY THAT THE DRIVE 
AoE NED t5 APE Re AND THAT OME I THER atrénTion BIT IS SET. 
TEST 24 - TEST NO "PORT REQUEST’ WHEN READ RPCS1 THROUGH PORT ’B’ 
VERIEY THAT READING THE CONTROL REGISTER (RPCS1) DOES NOT SET ’PORT 
ZE THE OR THROUGH PORT ’A’ BY READING RPCS1. VERIFY THAT 
fhe ERIVE ORe BEEN SEIZED. 
READ THE CONTROL REGISTER FROM PORT ’B’. VERIFY THAT 'DVA’ IS NOT 


a E iggy THROUGH PORT 'A’. VERIFY THAT le DRIVE 
* RETURNED T6 RELTRAL THAT NEITHER ATTENTION BIT IS SET 
TEST 2S - TEST RELEASE BY PORT 'A’ WHEN SEIZED BY PORT ’B’ 


RIFY_THAT A_C I D BY ONE PORT IS NOT RECOGNIZED IF THE DRIVE 
Ye Ey ze By THe OTHER PORT. 


A. SEIZE THE DRIVE THROUGH PORT 'B’ BY WRITING 0’S INTO RPDS1. 

B. ISSUE A RELEASE COMMAND THROUGH PORT ’B’. 

C. VERIFY THAT THE DRIVE IS STILL SEIZED BY PORT 'B’. 

D eeenat Ly DRIVE THROUGH PORT °B’. VERIFY THAT THE DRIVE SWITCHED 


E- BLLGF aR RS Yan? REY eR RT crow BEF ieTBEF, Me -OROvE eTUMEE 


TEST 26 - TEST RELEASE BY PORT ’B’ WHEN SEIZED BY PORT ’A’ 


RIFY_THAT A_C I D BY ONE PORT IS NOT RECOGNIZED IF THE DRIVE 
Ye sez By THE OTHER PORT. 


A. SEIZE THE DRIVE THROUGH PORT ‘A’ BY WRITING O'S INTO RPOS!. 

B. ISSUE A RELEASE COMMAND THROUGH PORT ’B’. 

C. VERIFY THAT THE DRIVE IS STILL SEIZED BY PORT ‘A’. 

0 RELEASE Tyy ORIvE THROUGH PORT °A*. VERIFY THAT THE ORIVE SWITCHED 
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8.25 


8.26 


8.27 


8.28 


8.29 


RELEASE THE ORIVE THR PORT 'B’. VERIFY THAT THE DRIVE RETURNED 
"6 REUTRAL AND THAT NET THER ATTENTION BIT IS SET. 


TEST 27 - TEST SEIZE BY WRITING ATTENTION BIT 
TEST THAT od Ag THE APPOPRIATE ORIVE BIT INTO THE gh ey vo? Nala 
bone SEIZES THE DRIVE. VERIFY THAT REQUEST IS SET FOR THE OTHER 


A. were ~ APPROPRIATE DRIVE BIT INTO RPAS; VERIFY THAT THE DRIVE 


oa THROUGH. THE HE SE ZING PORT VERIFY THAT THE 
puto ESPORTS SSUE A RECEASE THROUGH THE 
@NS VERIFY RATT ORIVE 1S IN NEUTRAL. 


TEST 30 - TEST NO SEIZE WHEN 'O’ WRITTEN INTO ATTENTION BIT 


VERIFY THAT THE DRIVE b3,' NOT SEIZED WHEN A ’ZERO’ IS WRITTEN INTO 
THE DRIVE’S ATTENTION 


BET Sr FuPPaNi ve Bene TESTED. INO? THE ATTENTION REGISTER. 

B. VERIFY THAT THE DRIVE IS STILL IN NEUTRAL. 

TEST 31 - TEST PORT ’A’ TIMEOUT DOES NOT RESET DRIVE 

VERIFY THAT PORT TIMEOUT DOES NOT INITIALIZE THE DRIVE. 

A. SEIZE THE DRIVE THROUGH PORT ’A’ BY WRITING O’S INTO RPDS. 

B. WRITE 1°S INTO RPER1 THROUGH PORT ’A’. 

C. WAIT FOR THE DRI TO TIMEOUT. RIFY THAT THE DRIVE RETURNED 
DORT Bi! ; "BND al NOTH as, of oh to" S IN THE ERROR RE Recre Tro 

TEST 32 - TEST PORT ’°B’ TIMEOUT DOES NOT RESET DRIVE 

VERIFY THAT PORT TIMEOUT DOES NOT INITIALIZE THE DRIVE. 

A. SEIZE THE DRIVE THROUGH PORT ’B’ BY WRITING O’S INTO RPDS1. 

B. WRITE 1°S INTO RPER1 THROUGH PORT 'B’. 

C. nebTaacy THE OORIVE E 184" eet oMERIEY THAT THE Iv RET RN URNED TO 
PORT AND THAT Bo see" 1’ rer IN Fue ERRG REGISTER. 

TEST 33 - res? RELEASE THROUGH PORT 'A’ WITH ERRORS SET 


yeRiry THAT _A RELE® OMMAND PERFORMS NO ACTION IF ISSUEC WHEN ERROR 
TS ARE SET IN RIVE. 


A. SEIZE THE ORIVE THROUGH PORT *A’ BY WRITING 0’°S INTO RPOS1. 
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8.30 


8.31 


8.33 


B. WRITE 1’S INTO RPER1 THROUGH PORT ‘A’. 
. g RESET, H PORT ’A’. VERIFY THAT THE ’GO" 
T THAT _ NOT RETURNED TO NEUTRAL, AND 
HAT R1 HAS NOT BEEN ec 


D. CLEAR RPER1 BY ISSUING A DRIVE CLEAR COMMAND THROUGH PORT ’A’. 


+ ARAco™HOEREE RRS REPRE EREE arewrfERMEY TET STIE O° 


TEST 34 - TEST RELEASE THROUGH PORT ’'B’ WITH ERRORS SET 


VERIFY THAT A RELE COMMAND PERFORMS NO ACTION IF ISSUED WHEN ERROR 
BITS ARE SET IN THE DRIVE. 


A. SEIZE THE DRIVE THROUGH PORT 'B’ BY WRITING O’S INTO RPOS1. 
B. WRITE 1’S INTO RPER1 THROUGH PORT ’'B’. 


Cc. Fee 8 ORI ve HAS PORT ’B’. VERIFY THAT THE °GO’ 
61 RESET. NOT RETURNED TO NEUTRAL, AND 
HAT NOT "BEEN CL 

D. CLEAR RPERi BY ISSUING A DRIVE CLEAR COMMAND THROUGH PORT ‘B’. 


ASSU5 a RELER Cc Teouat PORT ’B’. VERIFY THAT THE DRIVE 
ETURNED TO NEUTRAL THAT NEITHER ATTENTION BIT IS SET. 


TEST 35 - TEST TIMEOUT RETRIGGER THROUGH PORT ’A’ 

VERIFY THAT THE PORT TIMEOUT ONE-SHOT CAN BE RETRIGGERED. 

A. SEIZE THE DRIVE THROUGH PORT ’A’ BY WRITING O’S INTO RPDS1. 
B. WAIT SOO MS AND WRITE O’S INTO RPDS1 THROUGH PORT ‘A’. 


C. VERIFY Tear THE TIMEOUT OCCURS WITHN + ~ 25% OF THE SPECIFIED 
VINE, (THE ME EMENT %§ MABE PRON STeP °B".) 


0. yee quar THE ORIVE RETURNED TO NEUTRAL AND THAT NEITHER ATTENTION 


TEST 37 - TEST PORT ’A’ ATTENTION AFTER A COMMAND 
TEST THE OPERATION OF THE PORT A AND PORT B ATTENTION BITS AFTER A 
COMMAND . 


A. ISSUE A RECALIBRATE COMMAND THROUGH PORT ’A’. 

B. ery FOR _T he | ¢ TO COR, PORT (*DRY’ TO BECOME 
ot yer} y" Me TTENTION BIT FOR i” hed IS SET AND 
THAT’ THE ATTENTION BIT FOR PORT 'B’ IS NOT 


C. RELEASE THE ORIVE THROUGH PORT 'A’. VERIFY THAT THE DRIVE RETURNED 


SEG 0017 


FOe 
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8.34 


8.35 


8.36 


TO NEUTRAL AND THAT NEITHER ATTENTION BIT IS SET. 
TEST 40 - TEST PORT ’B’ ATTENTION AFTER A COMMAND 
TEST THE OPERATION OF THE PROT A AND PORT B ATTENTION BITS AFTER A 
COMMAND . 


A. ISSUE A RECALIBRATE COMMAND THROUGH PORT ’B’. 
B. ert FOR _T C mer OMMAND TO con TE_(’ORY’ TO BECOME 
VERIFY mi at: ATTENT TONS BIT F Ogre hal IS SET AND 
THAT’ THe ATTENTION BIT FOR p Is Chor Se 


Cc. LEASE THE ORIVE T *B:. RIFY et THE ORIVE RETURNED 
*6 REUTRAL AND YRat Net THER RAT TENTION BI FY IS SET 


TEST 41 - TEST PORT INTERACTION FROM PORT 'A’ 

VERIFY THAT THERE IS NO INTERACTION BETWEEN PORTS. 

A. SEIZE THE DRIVE THROUGH PORT ’A’ BY WRITING 0’S INTO RPOS1. 
B. WRITE 1’S INTO RPER1, RPER2, & RPER3 THROUGH PORT ‘A’. 


C. READ R1, RPER2, R3 THROUGH PORT 'B’. VERIFY THAT PORT 
"B’ SEES bs FROM ekch SF THESE REGISTERS. 


D. CLEAR RPERI, RPER2, & RPER3 THROUGH PORT 'A’. 


E. Pa hc GFE Pon Ei of RPERS THROUGH PORT ’B’. VERIFY THAT 
F. T A’. VERIFY THAT THE DRIVE HAS 
Sut TCHED v9 PORT “BANG THAT T PIEENT On BIT FOR PORT *B’ IS 
eet ATTENTION BIT FOR IS NOT SET 
™ BPE ED Rb REL TROL AND. THA SEITHER R ARTENTYON BIT te Sete wees 


TEST 42 - TEST PORT INTERACTION FROM PORT ’B’ 

VERIFY THAT THERE IS NO INTERACTION BETWEEN PORTS. 

A. SEIZE THE DRIVE THROUGH PORT ’B’ BY WRITING O'S INTO RPDS1. 
B. WRITE 1’S INTO RPERI, RPER2, & RPER3 THROUGH PORT 'B’. 


C. BERD BRERA  c*PRORERCH OF THESE REGISTERS; © signe tot 


D. CLEAR RPER1, RPER2, & RPER3 THROUGH PORT °B’. 


E. WRITE 1°S INTO REERL RPER2, & RPER3 THROUGH PORT ‘A’. VERIFY THAT 
PORT ’B’ SEES 0’S FROM EACH’ OF THESE REGISTERS. 


F. RELEASE THE DRIVE THROUGH PORT 'B’. VERIFY THAT THE DRIVE HAS 


SEG 0018 
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Sato 


Oo 
Oo 


Be 


QOOOVONOOOH000000 
WNM-OWONOU CW OW 


TUT be 0 bo 


ROS 


Pinte atti 


+ Ob 0 Bs bs 0 0 bb be bo be Be Be be Be be bs be be bs be be Be es he ps Be Be a be pe ho fe be he be pe 
stata 
NOU 


OQOOOODOVOOOND0000 


Ww 
Ow 
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SWITCHED TO PORT ’°A’ AND THAT THE a Pcl a gir ng PORT ‘A’ IS 
SET AND THE ATTENTION BIT FOR PORT ’B’ IS NOT SET 


"RETURNED TO NEUTRAL AND THAT NEITHER ATTENTION BIT Is SET? 


8.37 TEST 43 - TEST PORT 'A’ ALTERNATE ATTENTION BIT PATH 
VERIFY THAT THE ALTERNATE ATTENTION REGISTER READ PATH IS OPERATIONAL. 
A. SET THE ATTENTION BIT FOR PORT 'A’. 
B. SEIZE THE DRIVE THROUGH PORT ’B’ BY WRITING 0’S INTO RPDS1. 


Cc. BER THE ATTENTION REGISTER & VERIFY THAT THE ATTENTION BIT 
FOR THE ORIVE IS SET. 


8.38 TEST 44 - TEST PORT 'B’ ALTERNATE ATTENTION BIT PATH 
VERIFY THAT THE ALTERNATE ATTENTION REGISTER READ PATH IS OPERATIONAL. 
A. SET THE ATTENTION BIT FOR PORT 'B’. 
B. SEIZE THE ORIVE THROUGH PORT 'A’ BY WRITING O0’S INTO RPOS1. 


C. READ_THE ATTENTION EGISTER & VERIFY THAT THE ATTENTION BIT 
FOR THE DRIVE IS SET 


8.39 TEST 4S - TEST NO TIMEOUT THROUGH PORT ’A’ 


Ma aa rer eT ING PORT PE NOT TRIGGERED WHEN THE ORIVE 
Ys FOR el tat ACCESSES. 
THis Te WEST I Pere Oars Ro77s "PTB OARD_AND IS 


HE a GUENCE: TO RUN THIS TEST, IT MUST 
BE SELECTED Fab ite 
A. SEIZE THE ORIVE THROUGH PORT ’B’ BY WRITING 0’S INTO RPDS1. 
B. SET PORT REQUEST BY WRITING 0’S INTO RPOS1 FROM PORT ‘A’. 
C. ISSUE A _RE COMMAND FROM post od VERIFY Ter Ve pRIVS 
P| rere 1 , THE OTHER PORT AND THAT THE *ATA’ BIT DID N 
SE . REGISTERS WILL NOT BE CHECKED THROUGH PORT “A. 


D. WAIT THE chat ouT INTERVAL + 25%. VERIFY THAT THE DRIVE HAS NOT 
BEEN RELE 


© REAEAREOTHS RELYRaI"SRB AAP er fhen NPT dhe PM REY 
8.40 TEST 46 - TEST NO TIMEOUT THROUGH PORT ’'B’ 
YePHEde *BDaT aAd"EPYT QS SBA of Bt TRECRESER REN TEE PET 


THIS TEST IS RIVES WHICH 
NOT RUN AS Bary THE TEST SEQUENCE 5 RUN THIS TEST, IT MUST 
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1044 BE SELECTED SEPARATELY. 
igus A. SEIZE THE DRIVE THROUGH PORT 'A’ BY WRITING O'S INTO RPDS. 
1045 B. SET PORT REQUEST BY WRITING 0’S INTO RPDS1 FROM PORT ‘B’. 
if S & A RELEA OMMAND FROM PORT ‘A’. VERIFY THAT THE DRIVE 
1048 tae Ue SP TCHED #5 HE OTHER BOR AND THAT THE 'ATA’ BIT BID NOT 
1948 SET FOR PORT 'A’. REGISTERS WILL NOT BE CHECKED THROUGH PORT ‘B’. 
1051 D. WAIT THE TIMEOUT INTERVAL + 25%. VERIFY THAT THE DRIVE HAS NOT 
105¢ BEEN RELEASED. 
1054 E. RELEASE THE DRIVE THROUGH PORT 'B’. VERIFY THAT THE DRIVE 
1955 RETURNED TO NEUTRAL AND THAT NEITHER ATTENTION BIT IS SET. 
1057 
1058 
i059 3 PROGRAM LISTING 
1060 a a a i 
1061 a 
1062 
1063 
1064 .TITLE CZRJEBO, DL CTRLR LGC 
1065 ;#COPYRIGHT (C)’ 1976, 1977 
1066 :*#DIGITAL EQUIPMENT CORP 
1967 j #MAYNARD, MASS. 01754 
1BeS :#PROGRAM BY C. HESS 
;* 
1971 !#THIS PROGRAM WAS ASSEMBLED USING THE POP- 11 MAINDEC SYSMAC 
107@ :#PACKAGE (MAINDEC-11-DZQAC-C3), JAN 19, 1977. 
1074 . 
1075 -SBTTL OPERATIONAL SWITCH SETTINGS 
1077 ° 
1000 .S SWITCH nmmainaan USE ee 
1079 : 15 HALT ON ERROR 
{bes + 13 Ther 4 ERROR typEouTS 
{Bes  # ll NIB T T ERATIONS 
1083 i 10 BELL ON ERROR 
1084 :# 3 LOOP ON ERROR 
108s 
1086 
108? .SBTTL BASIC DEFINITIONS 
1089 -#INITIAL ADDRESS OF THE STACK POINTER ### 1100 ### 
1996 061100 STACK= 11 
1091 - EGUTV ENT, ERROR ;;BASIC DEFIN TION OF ERROR CALL 
1oGe “EQUIV TOT’ SCOPE ::BASIC DEFINITION OF SCOPE CALL 
1094 s #MISCELLANEOUS DEFINITION 
i832 900011 HT= I ON ODE FOR HORIZONTAL TAB 
109E slelelehe- LF= 12 ::CODE FOR LINE FEED 


= 


Pe a ey eee rd ed ed ed nd ee ed ee ed ed ed dd od od oe 
MAMET EEE £ EE FOWWMWMWWUUnrUMHUIUTUrrrrr-+-r-+- OOODO00000RD 

U bb b= b= oe 

fMr-OwM SFA tO owe Set atta Fiat ttetelt tid aH bt Se NOW £Wl-OwWW SRR2EERLS SS 
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000015 
000200 
177776 
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BASIC DEFINITIONS 


Cerrerrcre 
Ceece << 
reeeeerece- 
NOW CWO 


co oe 
= ’ 
, = 27776 tt BR ES 
STKtnt= 135534 5 5B TACK LIMI 
a Ve 
z ss 
ISP= 13 5E 50 + HARDWARE a 
-#GENERAL PURPOSE REGISTER ay 
RO= ~%0 He 
Ris “1 33 RAL 
Re= ze 35 RAL 
R3= “3 $3 RAL 
RY= “4 33 RAL 
RS= %S 33 RAL 
R6= “6 $3 RAL 
Se: + SEEK Bo 
= % 33 
PC= “7 +t BROGRAN 
-*#PRIORITY LEVEL DEFINITIO 
PRO= 0 1ORR ORITY 
PRiz 40 ; ;PRIORITY 
PRe= 100 ; ;PRIORITY 
PR3= 140 ;;PRIORITY 
PRY= 00 s sPR TOR TY 
PRS= 40 ;;PRIORITY 
PR6= ;;PRIORITY 
PR7= 340 ;; PRIORITY 
“il ae SWITCH DEFINITIONS 
14= 40000 
SWi3= 20000 
SWle= 10000 
SWil= 4000 
SWi0= 2000 
SwO9= 1000 
Swos= 400 
SWwO7= 20 
SWO6 10 
SWwOS= 40 
Swo4= 20 
ease 10 
SwOe= yy 
aubos i 
EQUIV 8,Swg 
Ha 283.8 
-EQUIV SWO7,SW7 
-EGUIV dr 
- EQUIV 4, SWY 
EQUIV 3, SW3 
-EQGUIVY SWO2,SWe 


TURN 
TURN 
8) 


“LINE FEED 


T REGISTER 


SEG 9021 


TOMI mm 
bat ht Ad Ha 


ee ee ae be be he be be hae hs en Bo he be 2 Bs 0 = Be Be bb 0 oo be 


BR VRRP Se ION Lor Od VOUT F Osve Owed VOUT ED 


nm 
=) 
~ 


SEM eee ete REN RE ae 30 


fyryrvruety 
BURNED 


J0e 


Wi£wW bat = 
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Pil O4-NOV-77 13:27 BASIC DEFINITIONS SEQ C022 
-EQUIV SWO1,SW1 
"EQUIV SWOO, SWO 
-#DATA BIT DEFINITIONS (BITOO TO BITS) 
499000 BI iS= 1 
0000 IT1l4= 4 
sree erie: ieee 
= 
IT = 488° 
T10= 2000 
001000 1T09= 1990 
0004 Bit = 4 
9001 Bites foo 
= 
Bop aND BITOS= 40 
aay Bitos: 10 
= 
BO0004 BI De= 4 
ooo002 BITOl= 2 
000001 BITOO= 
“EQUIV 6ITO9,8IT9 
“EQUIV BITOS, IT 
“EQUIV 107,B1T 
[EQUIV T06; BIT 
*EQUIV TOS;BITS 
“EQUIV TO4’BITY 
[EQUIV T03,81T3 
“EQUIV TO2;BITe 
[EQUIV TO1,B1T1 
“EQUIV BITOO;BITO 
:#BASIC “CPU” TRAP VECTOR PROBESSES 
oooc04 C= 4 0 THER E 
000010 oa C= 10 ieee & D AND ore GAL RAG CFRUCTIONS 
000014 TEITVEC=14 
000014 T = 14 ‘ith 
000014 BPT = 14 + OTNT TRAP (BPT 
oo00c20 OTVEC= + T/OUTPUT TRAP CLOT) #*SCOPER* 
000024 C= 33 i 
30 EMTVEC= 30 Hato: RAP (EMT) *#ERROR## 
000034 ca34 ae | 
o0c060 TKVEC= Y KEYBOOR 
000064 & Hay Y PRINTER °VEETOR 
000240 PI MBVECS 40 INTERRUPT REQUEST VECTOR 
 idilemnenibbeniiniianaannbat 
.SBTTL RH11 REGISTERS 
Ne ee Ett Lhd h dtd ik ielatelaladshahahalalaheiaielaislaisicisielel 
;CONTROL AND STATUS REGISTER 1 (RPCS1) 
000100 IE= 100 ; INTERRUPT ENABLE (BIT #6) 
000200 RDY= 200 READY (BIT #7) 
000406 Alb= 406 HIGH ORDER BUS ADDRESS BIT (BIT #8) 
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RS 
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c 
Cc 


S BIT (BIT #9) 


Wi-g& Bae 


. 


O--UM TF NwOt.Oo 


Hn ttt mt ee 


IS CALLED BY BIT NUMBER) 


SS REGISTER (RPBA) 


I 


;CONTROL AND STATUS REGISTER 2 (RPCS2) 


?CERCH 


SHPRCH BIT IS CALLED Gy Bit NUMBER) 


bap be J 
cucum 


INHIBIT (BIT #3) 
8) 
9) 
) 
) 


eee 
one eae fee 
| ol aed ool 


sae oe 





gee 


AAACN ee 


furueurueurucurucucurucurucucurucucucucucucucucucurucurucucuruaucuucucutuauuauaurueucurueurucucuucuauururuU 


REGISTER (RPOB) 
S CALLED BY BIT NUMBER) 


an 


O-uM 


fucuduu 


(BIT #0) 
(BIT #1) 


;ORIVE TO INNER GUARD BAND (BIT #2) 


;ORIVE FORWARD 20”/SEC. 


DRIVE FORWARD S"/SEC. 


(#00) 


ff ASSESSES SESESESELEELALEALALSLAAL LALLA ELLA LALAAALL LALA RLRAALLER 


-SBTTL RPO4/S/6 REGISTERS 
jj OE aE ae ae a ae ae a ae a a aa A REE EEE EEE EE 


;CONTROL AND STATUS 1 REGISTER. 
;ORIVE STATUS REGISTER (RPDS!) (#01) 


900062 


008004 


FEAR ERR TY 


EERTEBO, OL ade 


eS 
wi 


SER SRA RR a tat 


ru 
@ 


EN 


Or de ed ed ee ee ed ed ee ey el ee ee ee ee eee ee ete ed 


29s 040006 
29 100000 
297 
533 
390 } 
301 
895004 
005010 
304 900020 
ae g90040 
308 
303 
316 pococ! 
a8 B3000% 
$ 900010 
34 000020 
315 O00040 
21E 005100 
317 000200 
1e 
213 
320 





> a 
13: 


LOe 
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o> ReowS’6 /b "hectsters 
; T $3). 
642 6 ; ow  H #4) 
l= ; 1 ¢ 
VV= ; #6) 
Y= 3 87) 
Bi 1 7 te 
tere 2 : FPRRED (BIT #10) 





WRL 8 
MOL= 8850 Tee ML 
| : 
ATA= 1 ATTEN i ACTIVE (BIT #13) 


;ERROR REGISTER #01 (RPER1) ene) 


N PROGRESS (BIT #13) 


bet 


( #0) 
tes LLEGa RUGGLION (BHT 303 

= 4 iF Eettoe ON REFUSED (BIT #2) 

PAR= ( + 3 3) 

FER= 2 ( $3) 

WOF = 4 c FAIL ¢ BIT 8S) 
ECH= ( Brie) 
HCE= (BIT #7) 
HCRC= 4 T #8) 

s 1 (BIT #9) 
IARE= VALID (BIT #10) 
WLE= 4 LOCK & mihi; #11) 

OTE= 1 ating. (BIT #12) 
Ones 50003 Ge UNSAFE. ¢ at Me iellcte 
= 

DCK= 1 tS A CHECK ERROR (BIT 15) 
;MAINTAINABILITY REGISTER (RPMR)( #03) 
DMD IT #0) 
MCLK= 5 RAINTR iia (52 CK (ott #1) 
ae I ARNT ait TY Se OER RtOCK (BIT #3) 
aoe L Wy fo cert #4) 
ty 4 ett TY WR eee (BIT #5) 
DTSY= 200 NeSiC TY SYNC DETECTED (SIT #7) 
;ATTENTION SUMMARY eeuumiamasetan (RPAS) (#04) 

;DEV O (BIT #0) 
| Sa ‘Device 1 (BIT #1) 
ATo= 4 ;DEVIC ; (BIT #2) 
AT3= 1G ;DEVIC (BIT #3) 
ATYH= 20 :DEVICE 4 (BIT #4) 
ee: iB ‘BAYES: & (BHT EE} 
AT?7= 200 ;DEVICE ° (BIT #7) 
:DESIRED SECTOR/TRACK ADDRESS REGISTER (RPDA) (#05) 
: (EACH BIT IS CALLED BY BIT NUMBE 


SEG 9024 


MOe 
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;ORIVE TYPE REGISTER (RPDT) (#06; 











2RIEB 
138 
1355 
a 
T R 
| me ete da 
1 193: T R BIT 4 
= ; 
135e Tou= | B0 ; Bit ¢ 
ie Bane ee trees FH § 
t Tbe= ; t R BIT 8 
1 33 @= 4 : REQUES QUIRED (BIT #11) 
1 MOH= 3; MOVING ( } #13) 
1 TAP= 40000 ‘TAPE DRIVE (BIT #14) 
1 NBA= 100000 {NOT BLOCK ADDRESSED (BIT #15) 
1 ;LOOK-AHEAD REGISTER (RPLA) (#07) 
1341 alate Exta= 3 tENTENSION 2 (BIT @D> 
= 
ie aise BENBION § (BIT #2) 
133 x1BBs 48 EXT BN e (BET £4) 
i xTHO= 4g ; ONG (BIT 5) oe 
= ; 
fe ce : Flees & (tt fe 
= 3 
1 1 ; FIELD 3 (BIT #9) 
i 1 sco : Ft ith he _ 
1 TRKe= ; (BIT 812) 
1 TRKG= : (BIT #13) 
i TRK10= : (BIT #14) 
1355 TRK20= 100000 ; (BIT #153 
i ;RPOY ERROR REGISTER #2 (RPER2) ( 
1388 wus CURRENT UNSAFE (BIT #0) 
1361 Hsu: | ORSREE Cort wot 
1 ceu= 10 E (BIT #3) 
1363 zs 2 RROR (BIT a4) 
1364 ToF= TOR FAILURE (BIT #5) 
1365 TUF = (BIT_ 86) 
1358 FEN= BIT #7) 
1368 MHS= ct tit 89) 
= 
tes : ite 
mw |O at it 
= 
1372 000¢ PLUs 20000 3) 
1373 100006 ACUs 100000 } 
1375 ;RPOS/& ERROR REGISTER #02 (RPER2) (#10) 
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-—«N 4 e anal 
-- se Ose 
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we m qa ss 
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) (#14) 
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R ¢ 
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OFFSET REGISTER (RPOF) (#11) 


our SF UUs 


HuSOGG>  w 


uu nununnhu | 
shanassgeeews & SESS Se cor 


“us 


;RPOS’6 ERROR REGISTER #03 (RPER3) (#15) 


;RPO4 ERROR REGISTER #03 (RPER3) (815) 


1 CURRENT TE CRCLED oY BIT NUMBER) 


PERE PORE EB ks? 


SERA a CALLED BY BI 





fe Ee 


RPP RRNGE SEG BER CUE RES SNR ERa RRO 07s OTR TUNA ReN RRR 
. TrT7T wr7I777777T7TTFTITF7FTFTFTIFIFFFIITITT 


Te ee ee ee oe ee ee ee re re ae ee ee Ce Ree Cee Ct Kee Cee Kee Co ee Doe Dee ee Dee Dee Dee Dee Dee ee oe teen 
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ESRTEB P14 O4-NOV-77 13:2 RPOWS/6 Rect sters SEG 0027 














Re 
18 
14 ;ECC TI GISTER (RPECL) (#16) 
13 peee OM BHT ee CALLED BY 5 rf HUMBERS 
14 ;ECC PATT ISTER ( ) (#17) 
1438 + EEE cH art Re eR Pee By 5 FF R) 
ea | 5p RASS SRSSERSS ASSESS SRSA LAER SSRLSKRSSRRS RA SERE REESE EEE EE ES 
isa .SBTTL DEFINITIONS OF THE RH11/RPO4/S/6 ADDRESS INDEXES 
ON 5g ME AE aE aE aE a ae aE a a aE aa aaa aa aa a aaa aaa aa aa aaa a 
144 RPCS1=0 sCONTROL AND STATUS REGISTER #1 (DRIVE REG. 00) 
1448 uneed =2 H T I C 75 ont G) 
1449 =4 : TER ( Ive REG) 
1450 =6 : S REGISTER (DRIVE REG. 0S) 
146] 21 ; (NOT A DRIVE REG) 
1452 121 : 01) 
1453 1214 § . ) 
14S4 = ;AT R (DRIVE REG. O04) 
1455 perks i LOOK . O7) 
1456 =22 > DATA A REG. ) 
1457 = } MAINT! DR G. 03) 
las Mu : Seek” 10) 
1460 ee : G ie 
1461 A= : YL giter (DRIVE REG. 12) 
1462 36 = ; S R (DRIVE REG. 13) 
1463 =40 : G. 14) 
ives S Risa tECC {PR CPRIVE REG. 16) 
1W66 relate’ geaie : &E pat E REET #E (DRIVE REG. 1$} 
1468 .SBTTL TRAP CATCHER 
1470 900000 ‘ 
147i ; HAL 5 9 LOCATIONS FROM 4 - 776 CONTAIN A “.+2,HALT” 
1472 $i 0 CATCH WELkEGAL TRAPS NTERRUPTS 
1473 : #LOCA TON 9 CONTAI TO CATCH IMP RLY LOADED VECTORS 
= 


~ re 
55 
tie 

83 

res 


74 
?e ba0000 SuREG: “WORD 0 ESOFTHARE SUITCH REGISTER 


-SBTTL ACT11 HOOKS 


—e 
S555 
Baio 


1ig0 HOOKS REQUIRED BY ACTII. 

1482 00 . VPC=. ; SAV 

ies See atte ea 

14@4 CO0046 BBb082 SE ;;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
.s 

1486 o000S2 “WORD 20000 ;;2)SET Loc.S2 TO 20000 

1487 000200 . =$SVPC 3; RESTORE PC 


CO3 
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C2RIEB. ail” O4-NOV-77 13: re SPARTING = 200 SEQ o0ze 
4 .SBTTL STARTING ADDRESS = 200 
149 000200 000137 N02064 IMP START ;START THE PROGRAM 
433 .SBTTL START THE PROGRAM AND CHANGE THE RH11 ADDRESS = 204 


re 
1494 

1495 000204 000137 002072 IMP START ;START AND CHANGE THE RH11 ADDRESS 
14 
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: 
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Hee 
: 
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COMMON TAGS 


-SBTTL COMMON TAGS 
pHRHEMERERERADAESEAEES DSTO HEME ONION STORAGE LOCATIONS 





ig Mt Pee Eilers 


EL Sa FRY oth 


; Ec NTAINS VARIOUS COMMON STORAGE LOCAT 
tRUCED IN Met nee 
.2=1100 
CNTAG: * ; START OF 
NM: .BYT + TA 
— : TA 
‘Bt ;; CONTA Ql _COUNT 
° : TA 
° i TA 
HH TA AL “HE erro 
; ITEM 
e 
+ 


0 
, 
6 SONTAING ‘BA T BE USED 
mee (Be BRI HERE HERTS 
tt BS 


: ; WR Bure 
ree i? ISP Oe Ay REGISTER 
ies Bias, spore ss 
tLé: ‘hi 3 Hee Tat oF Hoye REQUIRED 
se ‘BYTE Ot pay TERING” gis BF att b> OSES) 
“a . artes tf ssf Btheo 
$7heo:; cmorp |B a CF Ine 
TMP1:  .WORD 33 R DEF 
Thee WORD : StUBER DEF He 
TMP3: .WORD $8 R DEF 
TMP4Y: .WORD i R 


pion AoORES ONS 

CAPE : ; ES BPE ADDRESS 
5: ‘Be peer | i ¢ 

CR ASC «15> HS RI RETURN 

jAteuensenatseansseenensennsntehbinatonsstonsnensatanacenesenses 


tf 
R ;ADOR OF KW11-P STATUS REGISTER 
SLxcsr: “WORD o5ey g ‘ADDR OF KWL1-P COUNTER BUFFER 


a 
= 


SEQ 0029 
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CZRJEB.P11 O4-NOV-77 13:27 COMMON TAGS SEG 0030 





1sS4¥ o01e SLPVEC: .WORD 104 ;ADDR OF KW11-P VECTOR 
1585 O01¢ KS: . 177S46 : KW11l-L S ATUs REGISTER 

15 001 LLVEC: : 00 ; KWL vEcT 

1557 Sarg: . ; T 

1 P TB: : ; PORT Be 

155 PORTC: -WOR ; D FFERENT DRIVE 

1560 ASR1: WOR 0 sATA- ATA-B = 1 

156 PTNBR: .WORD O i CONTA T T 83 FOR ERROR TYPEOUTS 

1 T: io 0 :CONTA T HE SEIZING POR 

i T:  :WORD ‘ > CONTA T OF THE *OPPOSITE’ PORT 

1564 ST NUM: “WO j NUMBE T ¢ NT TEST 

1565 CKERR: WOR 0 tIF -1, A RE R MI ARI OCCURRED 

1566 N Ig: ‘ 0 sIF -1, T T IN ’ ger ID NOT BEIZE THE ORIVE 
1567 LERR: . 3 :IF -1: THE PORT IN ’ T’ DID NOT RELEASE THE ORIVE 
1268 T : 7 A Fe T * meet oka 

126 5 mE, eT t ORE “SHOT VAL MEASURED THROUGH PORT A 
1571 528 tH AP: “WORD 6 t PORT i! OUT UE ae 

157@ 262 TIMEAM: : c :PORT_A T OUT Vat = 25% 

157 4 T : WOR i THe TiMe - VALUE MEASURED THROUGH PORT 8 
1574 266 T "ie 0 : PORT OUT VALUE + 25% 

1575 270 TI : .WORD O j PORT T VALUE - 25% 

1578 272 TIMES: 7 WOR : TIME OUT NE-SHOT RETRIGGER TEST 

15 274 KYBCTL: : :SINGLE TEST INDICAT 

1678 276 CHEADR: WOR :C THE RH11 ADDRESS INDICATOR 

1380 ; ; ERASERS LLL AAA RERAL ERE ERRRRAERRERRRRRRRHE RRR ERE EE ER 

158¢ .SBTTL RH11/RPO4/S/6 UNIBUS AND VECTOR ADDRESSES 

12e¢ 83 KKSHAAKSAHSHRHKAKRERRAKAKRAAAKAEKRAKLRKRKSRKKKRRKAKREKRESRRLARESRRARKHKS 

1586 001300 176700 SRPADR: .WORD 176700 ;RH11/RPO4/S/6 UNIBUS ADDRESS 

1587 001302 od002e54 SRPVEC: [WORD 254 'RH11 INTERRUPT VECTOR ADDRESS 


FOS 


CORIEBO. DL CTRLR LGC MACYJ1 30(1046) _O4-NOV-77_ 17:48 PAGE 31 
CERT B ee Oe TRU ONOvS?? 13:2 eRton Botareh tase SEG 0021 
1589 \SBTTL ERROR POINTER TABLE 
1691 aTHIS 7 NTA INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
1592 NE Rta ¢oON ? OBTAINED The NDEX eh ON THe NO IN 
1695 He grin siteng. T a heli ATES WHICH ITER TABLE 1S PERTINENT. 
1694 El: "ei Q SS OE RT INENT T Data 153 RPC) 
1595 t ENOTE bach fen IN THE CONTA BINTERS EXPLAINED AS FOLLOWS: 
1597 EM POINTS 18 THE ERROR MESSAGE 
1598 ie DH ttB0 NTS TA HE 
1899 e OT HIPOINTS 
1600 i OF POINTS 19 THE DATA FORMAT 
1602 
1603 001304 SERRTB 
1604 
1605 ERROR 1 
EOE 001304 % EMI sWRONG DRIVE TYPE 
1608 001306 Ob6524 OHI 
ie09 001310 O70272 OTL 
119 001312 070542 OF I 
112 ERROR 2 
1614 001314 062517 EM2 ;DRIVE NOT ON LINE 
1615 001316 066534 OHI 
ieie 001320 O7027 OT 1 
1612 001322 07084 OF I 
1619 :ERROR 3 
tes? 001 S41 M3 ;SERIAL NUMBERS NOT THE SAME 
bee poise BeEeoS ate 
le23 001330 070306 O73 
ie24 001332 070542 OF 1 
1p25 
1686 ERROR 4 
1628 001334 062623 EMY DRIVE NOT SEIZED BY PORT ‘N’ 
ieee olaae | BeEeSs HY 
1630 001340 070354 O17 
1631 001342 O705eS DF? 
1632 
1633 ERROR S 
le35 001344 4 M SWRONG STATUS SEEN BY THE SEIZING PORT 
ie pos gers = 
1637 001 6322 OTs 
1e38 001362 070547 OFe 
1639 
164 SERROR 6 
1e42 001354 6272 EM SREGISTER CONTENTS WERE SEEN BY OPPOSITE PORT - ORIVE WA 
ie4S 00136 06724 H13 
ie44 001260 070374 OT13 


CZRI DL CTRLR LGC  MACY11 30(1046) _O4-NOV-77__17:48 PAGE 32 
eSRTEB P14 T 


O4-NOV-77 13:2 ERROR POINTER TABLE SEG 0032 
em 001362 070547 OFS 
iB4e ;ERROR 7 
1648 
164 


is 36 M7? ;REGISTER CONTENTS INCORRECT AFTER RELEASE/TIMEOUT 


~ 

o 

uw 

_ 
8888 
| ll ae aol comel 
WwW 
no 

oO 

| 

oO 

Ww 

uw 

£ 

“4 

N 


163s 

16 

ipe2 ;ERROR 10 

1658 001374 06320 EmM10 ;REGISTER CONTENTS INCORRECT 

1657 001376 06677 DHS 

1658 001400 070322 OTS 

1659 00140e 9070547 DFS 

1660 

1pei ;ERROR 11 

iges 001404 063133 EM11 ;CONTROL BUS PARITY ERROR WHILE READING REGISTER 
1664 001406 0671 DH11 

1665 atte 070e7e Bit 

1666 OO014le O70S4e Fl 

1667 

tee | ;ERROR 12 

1670 001414 063217 EMle ;DRIVE NOT SEIZED BY DRIVE CLEAR COMMAND 
1671 001416 067743 DH36 

igre 001420 07046 0137 

1P23 O0014ee 07057 DOF 36 

1925 ;ERROR 13 

1677 001424 063267 EM13 ;’VOLUME VALID’ BIT NOT SET SY READIN PRESET 
1678 OO014e& 06724 DH13 

1679 001430 070374 OT13 

1980 O00i43e 0705S OFS 

18S ;ERROR 14 

1684 pth 063354 He ;’VOLUME VALIO’ SET ON THE OPPOSITE PORT 
1685 1436 724 H13 

1688 001440 070374 OT13 

te 4 00144e 070547 DFS 

1g ;ERROR 15 

1691 QO1444 063417 mys :; THE ATTN BIT WRONG AFTER TIMEOUT - REGUEST NOT SET 
1636 OC 1428 pe 0e3 iH? 

1693 0014 70 DT7 

1694 O0014Se 07055 DF7 

1695 

1638 ;ERROR 16 

1698 001454 Oo3t78 eye ;ATTN BIT WRONG AFTER RELEASE - REQUEST WAS SET 
1693 0014 067052 H 

1700 O00i46€0 070354 OT7 
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OF7 
;ERROR 17 

Re 

DF7 
;ERROR 20 


DF 36 
:ERROR 22 


17:48 PAGE 33 


ERROR POINTER TABLE 


;ATTN BIT WRONG AFTER RELEASE - REGUEST NOT SET 


;DRIVE NOT SEIZED WHEN ATTN BIT FOR PORT CLEARED 


SEG 0033 


;ORIVE SEIZED WHEN ZERO WRITTEN IN ATTN BIT FOR PORT 


;DRIVE NOT IN NEUTRAL AFTER TIMEOUT, REQUEST NOT SET 


; TIMEOUT CLEARED THE DRIVE’S ERROR SIT 


oO 


WIFI II2 20s 
00D SGA pint ieteh tid ae 


statattolainipla 
OONMUI ES Wie 


Sob UN EwHo 


NNN 


NNN NN NNN NNN SSSI 
wre 


se ee ee ee Be ee ee ee ee he he be ho oe ee hh hb he de he 
PPP pahphhph hh! y 
eB DONOR E WU Oe Vous 


wo 
ww 
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Pil O4-NOV-77 13:27 ROR POINTER TABLE SEG 0024 
sERROR 24 
001534 O64116 ened ;RELEASE COMMAND RELEASED ORIVE WITH ERRORS SET 
001536 pores DHe3 
1540 070424 OT23 
001542 07054 OF I 
:ERROR 2S 
00iS544 064175 EM2eS ; TIMEOUT ONE-SHOT DID NOT RETRIGGER 
001546 067743 DH36 
0015 0704Se DT 36 
001552 9070570 DF 36 
;ERROR 26 
001SS4 064240 EM26 ;DRIVE NOT IN NEUTRAL AFTER RELEASE, REQUEST NOT SET 
001556 067367 DHee 
001560 O7041e DTee 
001562 070564 3 
;ERROR 27 
001564 064325 EM27 ;REGISTER WRONG AFTER RELEASE WITH REQUEST SET 
001566 067053 DH? 
001570 9070354 OT7 
001572 070555 OF7 
;ERROR 30 
001574 064403 EM30 ;DRIVE SEIZED BY RELEASE ISSUED WHEN DRIVE IN NEUTRAL 
001576 067743 36 
001600 0O704Se2 OT36 
001602 070570 OF 36 
:ERROR 31 
001604 o64S500 4 EM31 ;DRIVE NOT SEIZED BY PORT AFTER RELEASE WIITH REQUEST SE 
O0i60& 067644 DH31 
001610 o70440 OT31 
001612 64 OF 31 
sERROR 32 
001614 OB4SSS EM32 :ATTN BIT WRONG AFTER RECALIBRATE COMMAND 
001616 066777 DHS 
001620 97032 OTs 
001622 07054 OFS 
;ERROR 33 
0016 O64 M33 ;DRIVE RETURNS TO NEUTRAL IF ORIVE CLEAR GIVEN WHILE ORI 
OOl62— 067742 Hb 
OC1E30 O704¢z DT36 
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CZRIEB.P 
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1795S 
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bb be 
WONOU £Wlu-O 


RTCA EIRP REN TTC TS 


moo 
oe 2 3 
WONOW 


DL CT 
ll 


001632 


RLR LGC 


MACY11 30( 1046) 


O4-NOV-77 13:27 


070570 


070462 
070870 


065437 
067772 
07047e 


O04-NOV-77 


OF 36 
;ERROR 34 


17:48 PAGE 35S 
ERROR POINTER TABLE 


SEG 0035 


;ORIVE RETURNS TO NEUTRAL IF MASSBUS INIT GIVEN WHILE DR 


;DRIVE RETURNED TO NEUTRAL WITHOUT TRIGGERING TIMEOUT ON 


; TIMEOUT HAS NOT OCCURRED WITHIN 2 SECONDS 


;DRIVE IS NON-EXISTENT 


;ATTENTION FOR PORT NOT RESET BY MASSBUS CLEAR 


; TIMEOUT CLEARED ATTENTION BIT 


;ORIVE NOT IN NEUTRAL OR SEIZED 


;DRIVE IN NEUTRAL AFTER ATTENTION BIT WRITTEN 


ERIEBO, Ot CTRLR LGC 


. ee 
ets; 
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wR 
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ee ee ee eo ee ee eh ee 
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DOODDOWMMMD 
BdNeaZIN-S 
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Reese ERODES 
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Os 0 ee he hs ee he ae te ae ee ee ee = be ee ee ee 


REGRHS Se GRRE 


5 
3 
8 


88 
—P 
NN 
ez 


S88 B88 8 
2 ta 8 


y 
CY) 


88 
x 


Un 
Ut 


2 


5 


: 


O4-NOV-77 13:2 


001732 070573 


070272 
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DOF 42 


;ERROR 44 


M44 


4 
OT31 
DF 31 


;ERROR 45 


;ERROR 46 


EMYE 
DH46 
DT46 
DF 31 


;ERROR 47 


;ERROR SO 


EMSO 
Ht 
gH 


;ERROR Sl 


KO3 


17:48 PAGE 36 


ERROR POINTER TABLE 


;ATTN BIT SET AFTER TIMEOUT, 


SEG 0036 


;WRITE ATTENTION BIT DID NOT SET PORT REGUEST 


;CONTROLLER SELECT SWITCH ON DRIVE NOT IN ’A/B’ 


;CAN’T ACCESS DRIVE THROUGH EITHER PORT 


;ATTN BIT FOR SEIZING PORT NOT CLEARED BY MASSBUS INIT 


;ATTN BIT FOR OPPOSITE PORT CLEARED BY MASSBUS INIT 


;ATTN BIT CLEARED BY MASSBLS INIT, DRIVE IN NEUTRAL 


"ERR’ SET, NO REQUEST 


;CAN*T READ ATTN BIT FROM OPPOSITE PORT 


EER TEBO, OL ome LGC. MaCY11 30(1046) O4-NO 47448, PO 37 


O4-NOV-77 13:2 ERROR BOINTE SEG 0037 

1 002032 070542 OF 1 
138 
1308 ;ERROR S4 
1319 002034 068335 fis ;RELEASE COMMAND RECOGNIZED WHEN ISSUED BY NGN-SEIZING P 
191 4 31 
1914 
‘sie ERROR SS 
13te 4 Biee ; TIMEOUT ONE-SHOT IS LESS THAN SOC MS 
191 
191 070524 OTSss 
i : 070875 OFSS 
1ae¢ ERROR S6 
i9e4 4 47 EMS6 ;RH11 DIDN'T RESPOND TO ADDRESSING 
1392S Rtae 
is Sead lea BE 
1928 
1330 
1931 5p RSSRASLAKERELELAASLSLSERELELALESLAFSSEKA LASALLE ARKARALAA RARE RLEK 
a3 -SBTTL STARTUP AND INITIALIZATION ROUTINES 
oa 5; SASASSSSSESSSEEKLLESEELLAAALKALAAKARKALE LALLA RK RAA ARAL ALLE RASA E 
937 37 001276 START: R a ;CLEAR THE *CHANGE RH11 ADDRESS’ INDICATOR 
938 Boso? 4 BR SRR 2 B TO THE START 
939 012737 177777 001276 aren ART #-1, CHGADR Me * CHANGE RH11 ADDRESS’ INDICATOR 

1 oo000s LEAR THE BUS 


Te: RES 
“SBTTE ARITIALIZE T 
45C oP: Log ™ ee ae LOCATION TO BE CLEARED 


, :3CLEAR MEMORY LOCATION 


sep THE E atk POINTER 

fee FOR SCOPE ROUTINE 
vgcron FOR ERROR ROUTINE 
i Cecton FOR TRAP CALLS 


i, N OF ERATIONS 
Ait ERE late aS 


bi OP ADR 
NITI THE L ESS FOR SCOPE 

MOV te ERROR LOOP ADDRESS 

;;SIZE FOR A wendibee’ ST TCH nectivent IF NOT FOUND OR IT IS 


BRABEES Boees & 
wrorR Bids 


ZEEVERER 





Abd aE EE ES BEES 





Sr 


8 


2. 


he be 0-0 hn Be Be Bo Be Be Be Bae Be ae fee Be Be ee Be Be Be Be & = Be Be Bo Pe ae ee ee 
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13:27 


Posebs BRDeRS 
177579 99442 
002274 
006176 001140 
otatd May 001142 
177777 
vate 
ooo042 


001230 


MO3 
O4-NOV-77 17:48 PAGE 36 
INITIALIZE THE COMMON TAGS 


;;EQUAL TO A “=-1", SETUP FOR A SOFTWARE SWITCH REGISTER. 
Vv RROR VECT 


mov abeRRvE =-( p) ev 
Hv sBsha ISPLAY i i 4 I ay age oreR 
BNE bes’ 1 fey fo REPEREnCE Renouae oi nee 
BR 65 Ho Aer Bi iS nO = 
64S: nov Sees, (sp) :3;SET UP OR TRAP URN 
6Ss: nov aSWREG SHR ay? #POINT TO SOFTWARE SWR 
66S: MOV wOISPREG, DISPL ;;RESTORE ERROR VECTOR 
INC a-1 ;FIRST START ? 
me | Pate 1 OPE PROG 
1S: ISR PC. STKINT *SETUP THE TTY KEYBOARD 
.SBTTL ET =e FOR SOFTWARE SUIT GISTE sen gemma 
Bre eg 338R I mee 
MP PUR, @SHREG 33 th ee REG SELECTED? 
Sine s ; BRAG F 
= eas 8 - SETTINGS 
67$: MOVE #1, SAUTOB ;;SET AUTO-MODE INDICATOR 
"s<Jsr PC, CHANGE ; CHECK/C THE RH11 ADDRESS 
T . ,ENTERA ; NTER 35 
MOV (SP)+, PORTA ; ss 
Bo ii >See IF SS TOO LARGE 
Tee Re Tyee aboRESS ERROR MESSAGE 
2s: MOV ; Rare THE PORT B ADDRESS 
ME BSE Bort P mdmnangen 
MOV Porta, Sp) :PUT Ta ADORE SS ON THE STACK 
Bis ( sh) Porte sere ts 2 IN_PORT B ADDRESS 
MOV PORTA, -<SP) Wee. om ' oR : OUT 
TYPOS 5 3 GO --OCTAL I 
BYTE 4 , pon ZEROS 
TYPE PORTBIS : PORT Ss NGe ’ 
MOV PORTB, -(SP) ite T Rong se 
TYPOS ::GO RT RAL 2 I 
‘BvrE ob : jSuPPRESe LEADING ZEROS 
TYPE SCRLF :ANOTHER CR-LF 
MOV PORTA, PORTC :GENERATE ADDRESS OF DRIVE NOT TESTED 


SEG 0028 


NOS 









E IF “HUMBER GREATER THAN MAXIMUM 


I FF ae 


mart pS CTRLA LGC, BACT S! SOCIONO) OI YAU Ue Fok SF TWARE SHTTCH REGISTER SEQ 0029 
ogooes = Bis30 Bre Ne il i SAVE ett 
001232 Move saa THCRL) ,ASRL "GET _ATTENT 
i CLR TI ;¢LEAR T 
| a ae 
ie es cB 
J ext ; eC Ock BEEN STARTED 
ate TYPE , NOCLOCK are KON SYSTEM 
: BR 3s : INTE! THE HALT 
;ROUTINE TO GET THE TEST NUMBER FROM THE OPERATOR 
€: om his SLERE RE"PROEEBcon starus wero 
H ney se Ee ee 
444 Jan ; ya: 
ISR FINI 4s KEYBOARD 
1274 LR 3¢ P bes CATOR 
61 & Soiloe nove : NITIAL ea LOOP ADDRESS 
7 DO111 mov ; ne seitine £3 R LOOP ON ON ERROR ADDRESS 
1 304 1S: moet 
Vv ; ENTR RY NTO R1 
; RTER DERO ALL TESTS 
; 


RY 


R $8 
2 Ra 
e 
Ria es | 


$ 
3$: c is sOEC yt Said 
_ pee 
161 070602 002752 Vv TSTHOR(RI),4YS ,GE = sponge 
1274 INC KYBCTL spel St mar 
001104 MOV #1, SICNT ; Fon COUN 
; $057 rage Tes Tes? 


= 
é 
4 
+ 
> 


;CHANGE THE RH11 UNIBUS ADDRESS useD BY THE PROGRAM 


737 001276 CHANGE : Ist CHGADR 1 CHANGE TH THE ADDRESS ? 
276 CL HGADR SBE out We jtiotee 
i 364 1S: TYPE BODRIS OUT wnat THe PRESENT afiboRess 1s 
0137 I MOV $rP -(SP) sPUT GN THE ST 
34 t 401 001207 TYPES , SCRLF i ope Ee “ReTU 
2573 003004 10440: O62444 TYPE "MTRHLL :ASK FOR NEW ADDRESS 


MACY]: 30( 1046) 


cSRyee Pile ~'Benbv=77 13:2 





003064 013700 


popaepecaseseaeaes 


ee ee 


OONIOVUIEL We 


rorurororurururorurururerurorurerururururururororuroruroruru 
ieietehetebehetetabatenstatenetoteeneaaease a 
WwW 


061300 


ue 


1 
1244 








: B04 
GET VALUE FOR SOFTWARE SHETCH REGISTER 


BEG + i ' cba i sie (NO ADDRESS CHANGE) 
v (SP), SRPRDR See 
TST (SP )4 i Conn K POINTER 
7 a4 spe" ib0 Be 
rey CRON ey ie pens THAT Ess 
2 it 1 RODRESS 
4S: RROR H 
84, SP H T Ak ‘Ace : 
v a6, ae4 : on ms 
pee PC ;R 


$5 Be aE AE aE aE ab a be ae ab ae ae a ae ae ae aaa aa aE 


.SBTTL ##8 TESTS ##% 
3p a aE aE ae ae ab a a a a aa a aa aa aa a ERE REE RERER EERE EEE ES 


TSTIAA: MOV SRPACR , RO ;;RESTORE RO AFTER END OF PASS 


z aa. eee Bee Oe ee 
: ATE DRIVE ACCESS TEST 


t VERIFY THAT THE DRIVE CAN BE ACCESSED THROUGH BOTH PORTS 


-# 
3% ECT ete RIFY THar THE ORI NT THAT TH 
;# id A) THA ORL INE (RP 1_HAS 
BO OaY: ITs Ser DRIVE SERIAL 
:* TH PORT 
i# 8 THE TEST IS REPEATED THROUGH BOTH PORTS. 
ST ge ieee arse vss 
T r KyBCTL ; ORMING ONLY SINGLE TESTS ? 
is ; Ph SLE RED rs T 
J ; wh 18 NUMBER 
1g: MOV Th ay CTL : rs “fn XTND ator 
: MOVB ; 
MOV i 3L pt ON TEST 
MOV aT i PERR 7L On ER OR 
MOV i Ps TERATI 
TEST1: MOV Ha THE Brae K POINTER 


: LERIFY THAT DRIVE Ie PRESENT THROUGH PORTS AE Oe 
:YERIFY THAT DRIVE IS PRESE 


move pure presen, yore “ HD ge pe 
a aia sae TQ LOCATION FOR TYPEQU 
CLR eee Ad THE ’CHECK ERROR’ FRB TCATOR 


SEG 0040 


CZRJEBO, DL CTRLR LGC MACYI1 3011046) 1oinnov-77 7:48 
CZ2RIEB.P11 O4-NOV-77 13:27 Tl DRIVE ACCESS st SEG 0041 


2130 003172 016037 000010 001126 MOV RPC T A he NTs OF RPCS2 
1 737 : 9 1l2e2 Ba goat al ERROR MESSAGE 
1 il ; WHAT Be 
1 1 ul T ; } R ONTEN NTS TO 'STMPO’ 
Heats 
Sou ! ee "GE Ragkeo 


j ORT Hs B88, Bafa "Bor TYPEOUT 
SET THE REGISTER COMPARE ERROR INDICATOR 










———— poe 








64S: 
; SET 
990318 oe INIT TO CLEAR ‘NED’ 
1234 ¢ ae poer BS "Phe ON FOR TYPEOUT 
AD TCATOR 
Botise Tre Re Lees BF ERROR MESSAGE 
; 
Boi 1e4 } TER CONTENTS. TO *STHPO’ 
001164 ; re Bits: 
B01 174 i COPN, PD PATA ert 
001124 ; BRS WITH 6000 Bata Foe TYPEOUT 
pre, SPORTSTER COMPARE ERROR INDICATOR 
66S: NOP 
ey Cage rg ae 
000010 MOV accr, RPCS2(RO) ;ISSUE MASSBUS INIT TO CLEAR ‘NED* 


$ Leuaveneusvsousuanetsuersuzseatanananennenseesecusearseeeenenes 
tbo NFIRM THAT DRIVE IS AN RPON/S’6 AND IS DUAL PORT 






Porurororerorurorerururorururururururvrurururururororururury furufuru 
epbperhebpirieeebeirereheirbebebpieighebrireriteebeithebebeiehteeetithebeieieh tebe tieieh the tithe tirirk 


REO OD VOI LOI ODD VO EW OOD WUE Loe Oe VET EU O BB VN 2 cate 


990010 MOVB PORTA, RPCS2( RO) 
1234 MOV PORTA, PT j MOVE. ATION FOR TYPEOUT 
CLR KERR’ ok ERR NDICATOR 

901126 v RPDT (RO), SBI mit 
061122 MOV RPOT . SBOADF : ERROR MESSAGE 
DO1il fo . ws 
Ooi iE MOV 5008 a ON RE 0 *STMPO’ 
001164 BIC 4 "i i BITS 
001164 ne . ‘am 

1174 MOV 

1174 BIC r oas STMPY ELEAR 
001124 Ss STMPY , SGDDAT wit Cob. aa "Bor TYPEGUT 


CZRJEBO, OL CTRLR LGC MACY11 30(1046) O4-NOV-77 17:48 PAGE 42 
Cc Pil O4-NOV-77 13:27 Tl DRIVE ACCESS TEST SEG 0042 


ERROR ‘Tyre oes od 
«oe dkERR ;SET THe Reels ER COMPARE ERROR INDICATOR 


erg RP ae eal a bet sacri con rear 
és St aaa 


ae ERROR MESSAGE 















= 

at 
———— eee ee 
———— eee fe 


OO 


SRAPORLSSBSR : 


rorururururorurururerureny DB 
ar ee hee he eb a 


if of TO *S$TMPOQ’ 
cage" 

















64 ay 
101164 
001164 3 
Q $ IF 
00 74 V BDOF ;COPY_’ DATA 
2201 74 BIC : PLEAR RASKED 0 Bits 
ede 001124 Bis STMPY, T ; Wd TH A FOR TYPEOUT 
OR L TYPE 3 
2204 COM KERR :SET T GISTER COMPARE ERROR INDICATOR 
ee0s 70S: NOP 
soos g ee ee ete THAT THe DRIVE Ie ON LINE AND IN NEUTR 
e208 VERIFY THROUGH BOTH PORTS THAT THE DRIVE IS ON LINE AND IN NEUTRAL 
Bate 10 MOVB PORTA, RPCS2(RO) eu 
1 are: v TA;PT MO ATION FOR TYPEOUT 
Bae nae COR KERR Ve * INDICATOR 
1 001126 v ) T 
2 14 011 v ERROR MESSAGE 
1 DO1 Vv 
e817 301 164 HOY NTENTS TO *STHPO" 
es 
5518 001164 ene ; rie af 3 
aa B01 174 Y ele fe Bale 
ee . 
al 001124 Elon $THP4, SGDOAT OR ’ ai Bates GOOD ATA F FOR TYPEOUT 
2 CKERR tare T TER COMPARE ERROR INDICATOR 
2 ss 72$: NOP 
= cLR ick AR THE CH CK ERROR RROR’ amas 
558 81458 MOV ae 8¢ ERROR MESSAGE 
2230 ADD 
2231 001124 MOV ‘ onli nee ER Sou ¢ 
22 DO1164 MOV ; ae 0 PE TMPO" 
e 001164 ars ; 
: =o 001164 a4 i : 
236 001174 MOV OPY ° DATA’ 
2237 01174 : ; LEAR ED 17s 
g 28 N01124 15 ; it ’ tase OR TYPEOUT 
2240 Eon KERR ore sat ER COMPARE ERROR INDICATOR 
2241 74S: NOP 


ESRIEB P11 oTiae w<77 13: ee ws ta oR “oR ve Ad bEet SEG 0043 





900019 MOVB = PORTB, *Phovk 
1234 MOV PORTE; PTN ;MO tapes Cee hOSRTION. FOR TYPEOUT 
001126 V (RQ) ty mine $1 
0011 T. S.0F ERROR MESSAGE 
001124 WHA 
001164 : ONTENTS TO ’STMPO’ 
001164 ;SA 
001164 ; 
1174 See 
Boil e4 E 
001124 i sha BATA FOR TYPEOUT 


pais ne REGISTER COMPARE ERROR INDICATOR 





OM 
76S: 
sas om yict AR THE CH CK_ERROR’ “heme 
BOL iss HOV 2 fei des 8+ ERROR MESSAGE 
pos 001124 et ei at é 
gcd B01 164 ; a OE MPO 
ose 004360 Slt | , 
2 004 1174 6 LEAR T 
ger Oo 374 potted Yon whee RAKED ef Por TYPEOUT 
ee7e BouHOs -— :SET T GISTER COMPARE ERROR INDICATOR 
2274 ; 
2275 peezucpooucreresdscesrenuscsveceezesgoqooscssevanzerseseaezeese 
g5zo ‘VERIFY THAT DRIVE SERIAL NUMBER SEEN THROUGH BOTH PORTS IS THE SAME 
2278 OOwle 113 1224 010 MOVB P TA RPC 
2279 0044 01 $9 30 Oorie8 MOV A Bk t : Gd A SERIAL NUMBER 
ay W305 (ote 4550 001126 HOV" +} om T 8 SERIAL NUMBER 
2 1124 MP ; 
2283 Beaes (44 a = ie i ay i: 
FA Bowsy 032777 100000 174456 IT deus. , aSWR REP 
5ses 4 anata HALT ‘Ba Badan CABLE He8 SNNECTION PROBLEM 
288 Bouse 900004 : : 
2369 1s SCOPE :LOOP’ ? 
2e3l 8 ifeet SPORT A’ SEIZE TIMEOUT TEST eee 
ee3¢ ; ATE PORT 'A’ SEIZE/TIMEOUT TEST 


{VERIFY TuAr at ¥ DRIVE CAN BE SEIZED AND THAT THE PORT TIMEOUT RELEASES 


z S 
97 ;# A. WRITE O°S INTO RPOS1 THROUGH PORT ‘A’; VERIFY THAT THE DRIVE 


FOY 


CZRJEBO, DOL CTRLR LGC myst 30( 1046) -NOV-77 17:48 PAGE 44 









o4 
CZ2RIEB.P11 O4-NOV-77 Te PORT 'A’ SEIZE/TIMEOUT TEST SEQ cO44 
2 38 ;# HAS BEEN SEIZED. 
:*# B. R EACH ISTER, EXCEPT RP THROUGH PORT ’B’; 

2301 :* +35) ae a RRE REAG FROM EACH RedtsteR 

2: i c. WAIT F rite PORT TIMEOUT TO 1 reour AND RELEASE THE DRIVE . 
Bs ie va af OR REAPER User CERTIFY Mee Tae SUF RETURNED THe "Oh ive TO 

30 ia 
$308 HEXERBERRERLSEEREBEREKRAAEEHRKEDEERRHERLRGSAKEERERERS REFEREES EKER ES 

309 pow70 +672: 

2310 4 905737 001274 TST KYBCTL ; PERF NG ONLY SINGLE TESTS ” 

5313 uve fpaooe ¢ #3 : rh JUST ENTERED TEST 

2313 hoor 39 002602 mB EXEC : dea i F NENT OT EEF NUMBER 

318 01 77777 +=001274 1$ m0 8-1, KYBCTL ; ares? INDECATOR 

1S ii 7 D01102 2 vB We T : sr°h 

316 1 42 0011 sTeSt2,$LPAOR ; ae AQORESS 

e317 127 4 001110 MOV sTEST PERR : ons Ess 

Fs 1g 1 1176 MOV a ~.8t : 15 “ oF Ravi 

231 42 O1 11 TEST2: MOV K : 

2320 46 O1 40 177776 MOV a<S#32e.>,a8PS SET PRI Er fo oe Ease Lo LOOPING 

2321 ss4 37 001256 CLR T : EAR 

gee S60 7 001260 CLR TIMEAP SEAR bre tae OER ANCE 

g 564 001262 CLR TIMEAM ‘CLEAR LOWER T ut Tor RANC 

2325 yg AR AR AR aE aE aE AE AE aE ab a a a a a a aa 0 a a aa aaa AEE EERE RRR EE 

5358 :START THE TIMER 
2328 004570 005037 001252 T ;CLEAR THE ELAPSED TIME COUNTER 

g3e9 004574 012737 003720 o012es4 ay b2080. , WATCH ‘cee WATCH 5 OanD MS 

S33h g ; SAASSSSSSSKSSHSSLALHSALALAALLLSLLALLAALSLELLASEREARKKRLS SARS ALA EE 
g333 ;SEIZE THE DRIVE THROUGH PORT A 
é vB (RO) ECT 
ete Bptete er nae Si Port's aooress 

2338 10 MOVB Pp 

533 1234 MOV pobaese FOR TYPEOUT 

0 1240 MOV PORT 

eat 001126 nov By PORT A 

2343 001122 ADO : Eisree ADDRESS 

2344 CLR ; Bi) cb BE Ze 

eae 001126 ch i He REGI Ro” 

5349 RROR : 

e328 ee, MP :BeDORT RE . GE OR WE SUBTEST 

2350 990910 , MOVB PORTA, RPC Foo vi Boe T PORT 

2351 1234 MOV PORTA’ PTNB RODRE Q TO LOCATION FOR TYPEOUT 
2352 001126 MOV Resi (RO), soba IF ING PORT SEES CORRECT STATUS 
2353 01124 MOV #MOL!PGM! OPR! ORY, sibb T ;EXPECTED STATUS 





OO 
La 
»D 


rurorurerururererererrerrnnmmn 3B 


3 at 
mer 
wr wom 
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Bary 


a 
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Serereees 


ees 


e 
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tu 
gcc 
ane 


rurururu: 
WWWWW) 
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rurururu 
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snnnnagaoo 
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rorururorurururururururvururururu 
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R LGC HACY LI 30( 1046) O4-NOV-77 17:48 PAGE 4S 
=NOV-77 13:2 T2 PORT A’ SEIZE/TIMEOUT TEST SEQ OO4S 
Sire BaLgE Cotes REN FARR STHPL USE SODA DRTPLAS Bat Pteo srarus 
1 A 1186 001164 MOV T $THPO Seve ACT oratUs 
7 1166 001164 Bic § nO CLE TED B TS 
3737 1124 001164 Cc $ +, $T : I uex TED STATUS BITS SET ” 
1 OS _ ERROR S i PE PORT THE ERROR 
5, SSASSAASSRASS SAS LHESSASAHSSLSLAASLLAHRSS RHEE RAE RRR EEL EE EATER 
:READ THE ORIVE REGISTERS THROUGH PORT B AND STORE THEM ON THE STACK 
113760 000010 MOVB PORTB,RPCS2(RO) ; 
13737 001234 MOV T : T : ATION FOR TYPEOUT 
16046 c tro),-(SP) ; , PORT B, FOR CHECK 
1 MOV (RO); =-(5P) ; Ci; PORT B; FOR CHECK 
i Hoy ero) tcsB). R' poet Bo’ FOR CHEEK 
1 MOV RECE ( »°=(SP) c, PORT 8; FOR CHE CK 
roy Reg CaR =<) ; FORT. Foe Sick 
1 MOV RPERSt $,-(SP) ; Re, T 6, FOR CHECK 
1 MOV A(RO),-(SP) ; A, T B. FOR CHE CK 
1 MOV T(RO);-(5P) ; T’ T B’ FOR CHECK 
O1goue Bue Ov RPMRCROD’-(eP) R RPMA’ PORT B’ FOR CHESK 
16046 OO00014 MOV RPERI(ROS,-(SP) ; R RFERI, PORT 6, FOR CHECK 
ir cer cre a oc 
905760 000012 1S: TST RPDS1 (RO) ;MATT FORT oDRIVE TQ. TIMEOUT 
pe29 001254 eof WATCH BRECK Naten 
001372 BNE a BR IF NOT ZERO 
seni er Peeod trator Tne. Sages 
el A a ig AE 
_ Se el Et 
12637 001260 MOV (SP )+, TIMEAP By OLe 
012637 OOlebe MOV (§P)+? TIMEAM :=25% TOLERANC 


5p PERE SSR SRSA ESSE ELLE EEE EEE EEE EEE EERE EE EOE EE EE 
; VERIFY THAT THE TIMEOUT ONE-SHOT IS AT LEAST SOO MS 


CMP TIME, #SOO. ; WAS DERSURED TIME AT LEAST SOO MS” 
BHIS :GR IF I 
ERROR ;REPORT TIMEOUT TOO SHORT 


5p HA AE Ae A A ae ea a ae a a a aaa aaa aaa aa EEE EE 
; VERIFY THAT THE DRIVE RETURNED TO NEUTRAL AFTER PORT A TIMED OUT 


012737 oO00e40 177776 3S: MOV a<S#32.>,aePS ;RESTORE PRIORITY TO S 


OF 3787 OOleSe 000764 
1 sped 


O04 


CZRJEBO, DL CTRLR LGC MACYI1 3011046) O4-NOV-77 17:48 PAGE 46 


CZRJEB.P11 O4-NOV-77 13:27 Te PORT °A’ SEIZE/TIMEOUT TEST SEG SO4E 
‘9 ;VERIFY THAT THE ORIVE IS IN NEUTRAL 


Reese egee GATE conee BE oe ft rWRP 


O00S2i2 012737 011600 001124 MOV MOL t PGH! DPR! DRY , SGDDA pAgOMeARISON CONSTANT 
24 10 MOVB PORTA RPC (RO) id: 
i: 1170 MOV Shee Shr THP2 ; it th pe REGISTER FROM PORT A. 
164 Vv bps 
; 
73 
7 ; 


stars REGISTER FROM PORT B. 


24 * 
Gite REE ITS FROM THE COPY 
BISTE THE SAME FROM BOTH PORTS ” 


737 
1 Le 001164 TST oe He tet ARE THE SAME: ARE THEY ZERO ” 
Beastie steatent4 ion iRepOer IVE NOT IN NEUTRAL OR NOT SEIZED 
ppe3s4 ROQ432 beta 001126 66S: MOV i BYERS PossiBce Bho at Was ERROR MESSAGE 
01 00 12 o0 1234 V ; ZIM NG F TEST SHOWS DRIVE NOT IN NEUTRAL 
po1eee 00 10 MOVB pat BRO) Lect fa 


tie4 g le ay et NDENT BITS FROM THE COPY 


EQ 0 FROM PORT A. 


7 
414 BEQ 
Bosses Blaza7 opizey onte3y Roy i coe edt 1b Bl ar TE5y SegusORIVE WOT IN NEUTER 
7 589 BS fee — : ¥8 STP Malahat i SEE hast g ate EQ ZERO FROM PORT B. 
77 Bow See 
7 


oY a 1777 001250 67S: MOV #-1,RELERR ; fee ERROR’ aSNDICATOR 
e441 le 1 ERROR ; 
e442 414 O1 ¥ O OO1126 68S: MOV Ture, AT ; OR BIT FA AILURES WHEN RPDS1 READ 
2443 4 1 Ba 001234 v T 
4 1001 901170 BIC BATA! VV, STMPe ; CK ATTN Birt OR VV BIT 
2445 436 O51434 001124 00117 CMP T, $TMP2 cm ‘pifs cane a 
Saa9 1 BE eoR 8 Bare ai 
2 90 126 69S: MOV sTHe » $B008T ig CK FOR BIT FAILURES - FROM PORT B. 
4 MOV OR if 
24SO 005464 27 100100 001172 s DON’ creer OY Rune Rs OR VV BIT 

00547; 37 001124 001172 MP $GQ0A , STMP3 ; ELF AD OK FROM PORT B. 

ate 1 40 3 E Ror 7 RE PORT ERROR 
2454 005504 Od00240 70S: NOP . 


; jSECRHRHREHEEEREESEERESERRERE SESS ARESSTHE ERED NRHA A TC TERS SHOUL 
ROHECK T THE REGISTERS STORED THROUGH + ad B. ALL REGISTERS SHOULD BE ZERO. 
: THE REGISTERS ARE STORED ON THE STAC 


460 OOSSO&6 013737 00122 001234 4S: MOV PORTB, PTNBR *PORT NUN R’ TO THE OPPOSITE PORT 
ee) 005 4 10037 als iiee MOV RO, SO R is aBReS OOF AER GISTER RPERI 

24 2737 OO0014 oo1122 ADD RP BDAOR PERI FOR TYPEOUT 

e463 005526 012637 001126 MOV (SP +, 1 eBpbAT STORED CONTENTS OF RPERI 

e464 0055 001401 BEQ ISORTENTS 2e 0? 

2465 OCSE34 1O4O0E ERROR ‘ REPORT THAT PORT B SAW NON-ZERO REGISTER 


Preeerere reels 


BROB Ia 


PE 
Re 


HR 


TO4 


eee 





PPP Pe Pee ELLE ES 


g g z SST Rae RI ERERSS 


MACY ( ) O4-NOV-77 17:48 PAGE 47 
BO, Ot ab oA ears cs a Te PORT 'A’ SEIZE/TIMEOUT TEST SEG 9047 
10037 001122 MOV RO, SBDADR iBopRe Se OF Rene REGISTER RPMR 
#RPMR, : Ss FOR TYPEOUT 
Biscar BRN! Cue BBP PERSE EEBSREUSEBEE* G2 tonto’ SoutEMTS-Or ne 
ERROR ™ $BDADR A ; s a Recisr 4 RPDAS ow 
#RPDA, SBDADR : Ef E F YPEQUT 
— AOY (Sp), SBDORT C Cc THe TORED CONTENTS OF RPDA 
DOr BE OR Ro, se0apn : oe ha Sr Saad SZERO REGISTER 
tae MOV ; 
tt roy SOAIE aon | Eapne SOF Ber ORT rEGUt 
a a Oo ca ag 
4 a Bal ote geez nese 
4 MOV A 
ADD : A FOR TYPEOUT 
ose 3 ates nov tepy% SBboeT : Heck THE TORED CENTENTS OF RPLA 
Pa Fy : 
eee ERROR Bo, se0aon T ha oFOR arb abeRe REGISTER 
; S F OUT 
Bete oe GF nar cant B EBENTEW nrcne 
E : ah ? SPOR SA NON ZERO REGISTER 
Ooee se 001122 MOV SBDADR ; 58 oF 
BRPOF , : FOR TYPEOUT 
oos a2 abe aan: AOY tops e' SBDAT ; CHECK TORED CONTEN Ee OF RPOF 
BEQ Soe | H NT q 
710 1 ERROR e meanues : T ; r Por B SAW NON aBERO REGISTER 
005712 Oio 001122 MOV ; a re 
ADD : F YPEOUT 
536 aoe oo MOV aR C8 $BpAgR : . TORED OaNTEN S OF RPCA 
5 rend Q 4’ CONTENT "zeP 
33¢ 1O4006 : ee ER ROR & ‘ ; DOR § t PORT BeSiet NON-ZERO REGISTER 
740 8506 Ree OBBBA } 5 OF Bee F YPEOUT 
Ope 70 ieee TiZe i Say tess’ SBDat : CHECK T TORED CONTENTS OF RPCC 
400¢ BE ROR te : T 6 Ze T ES NON-ZERO REGISTER 
i bic 001122 AOV B 8 ; a OF Por Reg STER RPSN 
ADD Pr) ‘ ; 
2 i a CoG 
oe 4008 ERROR & : REP’ a? T NON-ZERO REGISTER 
° 06005 10037 001122 MOV Ro SBOADR : SS FOR ister RPER3 
737 O00042 001122 D aR? RS, SBDADR : 58 OF R3 FOR TYPEOUT 
00601 01 37 001126 MOV (SP)+, AT ; HECK T T CONTENTS OF RPER3 
gS HS os 12e Re” be sacs nae oy S-SiEG sOeszeTe MesusTeE 
S 1 ll ; 
#RPEC1, $BD ; S Rec FOR TYPEOUT 
g atu 1 639 seers cehanei AY (3p), SBODAT jCHECK T 19 ED CONTENTS OF RPEC1 
3 SoeD4S TD4ODe BE ROR 6 REPORT ou PORT 8 SEES NON-ZERO REGISTER 
i 006044 010037 o01122 MOV RO, SBDADR ‘BASE ADDRESS FOR REGISTE 


JO4 


CZRJEBO, DL CTRLR LGC. MACY11 30(1046) 94-NOV-77 17:48 PAGE 48 
CZRIEB.P11 O4-NOV-77 13:27 T2 PORT 'A’ SEIZE/TIMEOUT TEST SEG oO4e 
2522 062737 OO0004%6 o01122 ADD @RPEC2 $80 RES FOR TYPEOUT 
3 BOeDSE 012637 001126 MOV tep5s $acbAt™ K THe, st TORE CONTENTS OF RPEC2 
boebes B4age Fion 6 aT ha 
4 104006 ERROR 6 : T PoRT B SEES NON-ZERO REGISTER 
eoeb 006066 o00004 cs: SCOPE L 
See 3 trey ee eoRT BR’ SELZE TIMEOUT That eae 
5 ; ATE PORT 'B’ SEIZE/TIMEOUT TEST 


2530 
2531 nate THAT TATHe DRIVE CAN BE SEIZED AND THAT THE PORT TIMEOUT RELEASES 
Be ‘PPhady 

2534 :# @. WRITE 0’S INTO RPDSI THROUGH PORT 'B’; VERIFY THAT THE DRIVE 
3535 i HAS BEEN SEIZED. 

2537 ;* B. READ EACH DRIVE REGISTER, EXCEPT RPCS1, THROUGH PORT ’A’; 

e538 ® VERIFY THAT O0’S ARE READ’ FROM EACH REGISTER. 

2540 '% C. WAIT FOR THE PORT u QUT TO 1oeuR, AND LEASE THE DRIVE. 

2541 1% ME THE THe Ti T THE 
e542 1 i VAL UE OR LA VERIFY +eeU TIREOU RETURNED THE DRIVE TO 
sets - Sciomannes 

ess ° « SHERKSSRSSSERSSARSSSKRERASRRAKEAASRASSRRKEKERSKAARERERAAKRHRHRRAREER 

2546 006070 +673: 

2547 006070 005737 001274 TST KYBCTL s PERFORMING ONLY SINGLE TESTS ” 

cio Goetre Blogs et a fe Ser enreneo. rest 

2550 108 boot 39 002602 J URN? Ge F nex TEST NUMBER 

2551 006104 012737 177777 OO01274 1S: MOV ei st BCTL i t DET NEL TEST INDICATOR 

2552 906112 it 7 001102 2§: MO a,t3thn T R 

2553 0061 1 i42 001106 MOV sit T ; L ON TEST ADDRESS 

2554 006186 1 14 901110 MOV aT §T3’ 1 SLPERR L N ERRO R ADDRESS 

2555 0061 127 001176 MOV a ME : 19° 

2556 006142 012706 O011 TEST3: MOV & abe. :£O8D, 7 5 g ACK SOINT 

2557 O06 1 46 016737 0 177776 MOV 85x32. >, OePS at Paeodr'y TO oP Me Case LOOP ING 
2558 1S4 1264 CLR TIME LEAR OR PORT B 

2559 006160 005037 1266 CLR TIMEBP ;CLEAR an TI TOLERANC 

e560 006164 005037 001270 CLR TIMEBM :CLEAR LOWER TIMEOUT T 

eS6e2 To eee aantmina nonsense ait aii eit 

2563  éTaRT THE TIMER 

Sepe 170 005037 001252 CLR sCLEAR THE ELAPSED TIME COUNTER 

e568 era ee 012737 003720 901254 MOV $2000. , WATCH ‘cee WATCH FS 2000 ng 

S2e8 5p REAR REEEEEEREE EEE REESE RARE RSE ELAR RA RARREKEKRARKE REA EE 

e570 ;SEIZE THE DRIVE THROUGH PORT B 

2572 0062 113760 001226 o00010 MOVB PoRTB, RPCS2(RO) ; SELECT PORT 

2573 09216 013737 1 26 001236 MOV TB: SEIZPT :stORe “i NG PORT’S ADDRESS 

2574 16 005060 I CLR R S Si 

2575 OObeee 113760 OO ices 990919 MOVB PORTA, Recge RO) ELEC ORT 

2576 O06e 013737 1224 1234 MOV PORTA, PTNB Ove PORT T aboRESS TO LOCATION FOR TYPEOUT 
2577 O06e36 013737 OOlee4 001240 MOV PORTA; OPPRT ONT OPPOSITE” PORT ADDRESS 


KO4 








JEBO CTRLR LGC MACY11 30(1046) O4-NOV-77 17:48 PAGE 49 
& JEB. Th O4-NOV-77 13:27 3 PORT 'B’ SEIZE/TIMEOUT TEST SEG 0049 
2578 ! 7 33 001126 mov R (RO), SBDDAT a i OR SEIZED BY PORT B 
001122 SBOADR Re 3s7 R_ ADDRESS 
3500 il erR } : a si BE ZERO 
3 1124 001126 CMP GDDAT , SBDDAT ; 
1 Son te ; pe Re 
as i 007466 at She S$ REPORT RE r Ort THE SUBTEST 
1 1 10 MOVB PORTB,RPCS2(RO) ; T POR 
Fe A TS a a eo ae 
5283 18033 retees 1158 MOV 1 bRO) se0RaT wt Tp TAT 
353 737 BO Les 001166 MOV T,STMP1 ; TA a eek 
1 7 0011 COM ; T xree TED STATUS 
2s 1 001126 001164 MOV T, STMPO ; ACT 
2594 043737 001166 001164 BIC TMP 1, STMP ;CLEAR UNWANTE eite 
2595 023737 1124 001164 CMP t sTHPO THe ver a ED STATUS BITS SET ” 
segs mie 8 BBUF TH ERROR 
25 104005 RROR 5 
go38 000240 6SS: NOP 
see ; ee ee eee e TONE Than on ite aT 
1 :READ THE DRIVE REGISTERS THROUGH PORT A AND STORE THEM ON THE STACK 
5e05 400 11 001224 000010 MOVB PORTA, RPC (RO) T 
2604 406 13589 lee4 001234 MOV PORTA ¢ 5 TO LOCATION FOR TYPEOUT 
2605 414 Ol MOV cto ); C2, PORT A, FOR CHECK 
2606 4 1 MOV at }? =f ) } ’ PORT A, FOR CHECK 
2607 4 1 (RO);-(SP) ; * PORT A, FOR CK 
Ba ora HOV ( pat } 3 * PORT A’ FOR CHECK 
2610 Boewg 1 Bo0034 MOV (RO); -(5P) ; REA’ eoRT A; FOR CHECK 
2611 1 32 MOV (RO);-(5P) ; RPOF. PORT A; FOR CHECK 
2612 450 1 0 MOV Re(ROS,-(SP) ; R RPER2, PORT A, FOR CHECK 
2613 4 16046 MOV AC(RO),-(SP) ; R RELA, PORT A, FOR CHECK 
2614 460 Ol MOV T(RO);-(5P) ; R 7 T A, FOR CHECK 
2615 4eH 16046 900006 MOV (RO);-(5P) ; G R RPDA, PORT A; FOR CHECK 
2616 006470 O16046 MOV RPMR(RO):-(SP) 3ST G R RPMR: PORT A, FOR CHECK 
e617 474 O16046 OO00014 MOV RPERI(ROS,-(SP) ;STORE REGISTER RPERI, PORT A, PER CHECK 
2619 : -SEEEFEERESHREREALHEBEKREKRA LEE SRERKLKE REE EEE KEKARELKEDLRSREHRARRRASEE 
e620 *WAIT FOR PORT B TO TIMEOUT 
2622 006500 005760 00012 1S: TST RPDS1 (RO) ;WAIT FOR THE DRIVE TO TIMEOUT 
2623 006504 1 BNE 2s BR WHEN TIMEOUT OCCURS 
5PSe bbe BE 2 rt: 73 2 eoane BRE _ i6R fE_NG NOT oe Hi? 
514 ERROR our” “at HI N ECONDS 
sess boeeie 09137 007106 IMP a8 baat Tine fcen 
2628 006 12737 000340 177776 2S: MOV 8<7#32.>, a8PS NT. to + 0 STOP CLOCK 
shes 37 O01eSe 001264 MOV TIME TInes LAPSED TIME FOR PORT B 
JSR RS, TOLER ; hs OLERANCE 
263 DObS4e = TIMEB ‘tas AY eT FOR PORT B 
26 a8 001266 MOV (SP)+, TIMEBP +425% TOLERANCE 
2633 O06550 012637 001270 MOV (SP)+! TIMEBM +=25% TOLERANCE 


cen zeae OL CTRLR LGC. MACY11 30( 1046) -NOV-77 17:48 72 
JEB.P 11 O4-NOV-77 13:27 T PORT 'B’ SEIZE/TIMEOUT TEST SEG 9050 


5 5 SE aE Ae akg aE A 3 AE A A a A a a a a a a aa a a aaa aaa a aaa 
: VERIFY THAT THE TIMEOUT ONE-SHOT IS AT LEAST SOO MS 





Q0655y 18308; 001252 000764 eat . “pee ; WAS MEASURED - TIME AT LEAST SOO mS? 
40 006564 RRR S } ea TIMEOUT TOO SHORT 
2bY FH} +s SFSESKSSSKKSSKSERSSERASSSSERAERERESSRARSSRASRAASAARRRRRERSEAAESE 
43 VERIFY THAT THE DRIVE RETURNED TO NEUTRAL AFTER PORT 8 TIMED OUT 
nS 006566 012737 O00240 177776 3S: MOV #<5#32.>,a98PS  ;RESTORE PRIORITY TO S 
47 ; VERIFY THAT THE DRIVE IS IN NEUTRAL 
2649 001250 CLR ;CLEAR THE *RELEASE ERROR ’ INDICATOR 
34 oo 001122 nov iF nese OF RPOS1 FOR TYPEOUT 
Se 1 124 MOV . T ; FSON CONSTANT 
1 10 MOVB A ( : Cr PORT A. 
cu , 001170 nov 8 ; Oh VE STATUS REGISTER FROM PORT A. 
es *STMPO’ 
zoek i 001164 BIC, CH ; NDENT BITS FROM THE COPY 
eee : 172 nov P : ; si it TATUS REGISTER FROM PORT 8. 
2660 19 1 1166 BIC 8A ; 1 DEPENOEN T Bits FROM THE COPY 
ebb 1 1164 1166 cne 3b, stmp1 ; the ne GISTER THE SAME FROM BOTH PORTS ” 
e663 001164 TST es aa STERS ARE THE SAME: ARE THEY ZERO ” 
2665 : ERROR 4 ; aE T 4 IN NEUTRAL 0 OR NOT SEIZED 
See? 051170 001126 66S: MOV thee, sappaT a a Bap DATA FO FOR S ERROR MESSAGE 
2668 1 1234 MOV TB; 1Z oe Bao SHOWS DRIVE NOT IN NEUTRAL 
2669 BO 1e 000010 MOVB PORT »RPCS2(RO) ; I T 
2670 N01 i64 Tot ; FS ufo 0 FROM PORT A. 
2678 00 1224 1234 nov TA,PT ; es, TdF nESS SHOWS DRIVE NOT IN NEUTRAL 
Sera 001 76 MOVB sina. Cet RO) : TA 
e675 0011 rst STHPI : a ATUS EQ@ ZERO FROM PORT B. 
2677 177777 001250 67S: HOV #-1,RELERR ; er , ASE Sacer NDICATOR 
2679 1170 1126 68S: nov MP2, SBODAT ?LOOK FOR Retr AILURES WHEN RPDS1 READ 
160 1170 BIC BATALI VV eee ; Tce ATTN BIT OR VV BIT 
li 117 cnr T, $TmPe 3ALL pits ? nana 
PEROR ; PORT RR : 
Loe 031388 69S: nov STHP3, if CK i FOR BIT FAILURES - FROM PORT B. 
seae 1001 1172 BIC OaTATW.& :DO0N’T CHECK ATTN BIT OR vv BIT 
2688 lie4% 001172 CMP SGDOAT, Rie :SEE IF READ OK FROM PORT B. 
2689 BEG 70$ :BR IF OK 





MO4 


CZRJE8O, OL CTRLR LGC  MACYI1 30(1046) O4-NOV-77 17:48 PAGE S1 
CZRIEB.P11 O4-NOV-77 13:27 T3 PORT ’B’ SEIZE/TIMEOUT TEST SEG 90S1 
oe 007102 104007 ERROR 7 ;REPORT ERROR 
007104 000240 70$: NOP 


MECK THE REGISTERS STORED THROUGH PORT A ALL REGISTERS SHOULD 


i GuEC K THE REGISTERS STORED THROUGH PORT A. ALL REGISTERS SHOULD BE ZERO. 






Rtatutatatatid 
BELFRLOR= 
8 











7106 013737 001224 001234 4S: MOV PORTA, PTNBR : R’ TO THE OPPOSITE PORT 
7114 22 Hoy 36 : Ba STER 
1 14 oo1122 GROERI sSs0c0R : ; PEOUT 
i 1126 v (SP}+, Ack: ENT RPER1 
1 Peon ; REPORT Fun a PORT RO REGISTER 
i S oo112e AOD g H- “ieee te we 
i 1126 MOV (SP +, SBDDAT ; OF RPMR 
3508 1 ERROR & i Sr NON- ZERO REGISTER 
5508 1 001122 ROD : : ~fPDa F ef of 
eri} 0011 MOV ($P)+, T ; ENTS” OF RPOA 
oth OR 6 ; T T A SAW NON-ZERO REGISTER 
an Bbanet Mg vata ta 
a4 001122 é ; ADOR F QuT 
71s 1126 MOV (SP)+, T ; er ED CONTENTS OF RPDT 
13 ERROR fo,s j REPOF RT A SAW NON-ZERO REGISTER 
ig Boous6 001122 ADD SR SBD ADR ? ADOR 58 OF RPA FOR TPEGUT 
il MOV (SP) +, SBDDAT ; TORED CONTENTS OF RPLA 
ERROR | REPOR Wat boty SAW NON-ZERO REGISTER 
PBS coe = fy a ee 
1126 Py (SP)+, ; CONTENTS OF APL Re 
: ERROR : ik SAW NON-ZERO REGISTER 
96 
7 Bov0s ee FOV (SP)+, T ; tae cee ie a RPOF 
3335 001122 Rove Bo, senaoe REGISTER RecA — 
# 
533¢ 1126 aeuae nov (SP), 7 ; sfeseo! ate gu OF RPCA 
$ 6 
f: 00112 ERROR Ro SBDADR ey ue <PORT h RESTSTER RP ee 
27 001122 ADD eRP eck QUT 
4 
’ 


By Ret 
¢3 


TORED TORED. CONTEN S OF RPCC 
oe PORT BaF ER NON mae REGISTER 


BO OF RPSN FOR TYPEQUT 
BODAT :CHECK THE STORED CONTENTS OF RPSN 


$1828 


001i22 ADD 
MO 


8 
be 
~ 
tw 
r 


DL CTRLR LGC 4 1 30( 1046) 
ESRyES Pat prere a) 


= 
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> 
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> 
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7 
te 









783 
50 7 001274 
; T9559 oosery 
576 us 1106 
4 11 
7’ 11 


RA 


e601 o07S62 CNSO37 O0iese 


ae! 


FESS tal talalalaladelalel-1-$-1-tab-b-tied-+-Sotch-tet-tah-$-+-+-+-tal-+-+-1-hal- dab -+-5-tal tv halalalaialalalalel 
s PORT 'A’ COMMAND =A’ 


; ATE T4 
: VERIFY, THAT 


TUAT IME Delve ok FEigeo WHEN A COMMAND IS ISSUED. SET ‘Vv’ 
BRE LEE AE SREP PSP UEP ato HR" 
A LIT are RES fl ee 


T FOR ‘- 
HE PROGRAM. ) 


Cc. 


: ie me eo wee oe Oe 


= SOS Se oe Se ee er eres eresere 


teu: 


MO 
TEST4: MOV aStAcK Br ACK POINTER 
MOVB PORTA, (RO) a esi 
MOV PORTA; PT aa ADDRESS TO LOCATION FOR TYPECUT 
"ss ev + tee emeancmmaamnarmmaaammnataniemansnamanecccniacenantie 
:éTART THE TIMER 
CLR TIME ;CLEAR THE ELAPSED TIME COUNTER 


NO4 


port! "8° seTZeeTINEOUT TEST 
Citas ps 
5° 


dL) 


Begocbegocoege 8 


OUT 


wae 
MOV (SP)+¢, 


L 


SEIZE TEST & SET ’VV 


THAT T ov? oi BENG 


*B’ CAN ONLY BE TESTED THE FIRST TI 


Ht bnEGE RSAROLL SANE MES PERTAIN eteasen 


© ib Mb a Sb ab ie ab aE ab ab ab ab a aE a ae a a a a aa aaa aa aa aaa aa aaa 


ST KYBCTL aa Ms ONLY SINGLE TESTS ” 


ihe : shes PLP ERLE roc 


i, TE CaT 


MOVB ; 

MOV STESTY, SLPADR Oop ON rest ADDRESS 

MOV eT PERR OR ADDRESS 
t 


RO REGISTER 


fic, rire sot. 


OX Peeters seer 
: a aioe 


RO REGISTER 


ne 6 Con ey OF RPEC2 
PORT A SEES NON-ZERO REGISTER 


SEG O0S2 


qu 
m 
o 


Ld | 
a = 


sees 


DSSS BoD 
NOU LWl-O 


a he pe ee 


SSS uER EFS Reasaehcriyinai yi iit 


g 


DL CTRLR LGC. MACY11 30(1046) O4-NOV-77 17:48 P Ss 
Pil O4-NOV-77 Tse? T4 PORT ’A’ COMMER Se1ze TEST & SET ’vv-A’ 


osm 1573? BolzeY BOls3e nov PORTA, SEnzeT = Se 12D "poRT ADDRESS 


Pr eek See ee pena e 
 tSsuE DRIVE CLEAR COMMAND 
007602 012760 000011 o00G00 MOV @11,RPCS1(RO)  ;ISSUE A DRIVE CLEAR 


5p Me Be Me ME HE He a ae aE a ae eae aa 2a aaa aaa 
VERIFY THAT DRIVE SEIZED BY PORT A. 


HOV ee BN “a rove Fa SS _TO LOCATION FOR TYPEOUT 


CLR CK _E * INDICATOR 
MOV RPOS 












ERROR MESSAGE 
BE 


ISTER OK 
Els COMPARE ERROR INDICATOR 


4% 4 4 
w 
sOMMm 

w 


+ 


ier, 






aa 









AC 64S: 
ne TO TION, FOR TYPEOUT 
x CK ERROR’ 
oe ERROR MESSAGE 
vs R BE 
B07 74 TER 76° y ried 
1775 
x RTS 
D0 OR TYPEOUT 
sh Con T ore GISTER COMPARE ERROR INDICATOR 
: gg ’ CK ERROR’ INDICATOR 
001126 MO TENT OF RECS 
ll2e nov iF REG 5 be ERROR MESSAGE 
1124 sWHAT RE TER ULD 
1164 v ; e TE CON NT NTS TO *STMPO’ 
Hed SS ; HE Bre 
1174 Ste : DATA’ 
1174 > CLEAR E T 
pati Flin 5 They, a POR ul Th ata Por TYPEOUT 
sa: con a THE REGISTER COMPARE ERROR INDICATOR 


COS 


CZRJEBO, DL CTRLR LGC__ MACYI1 30(1046) O4-NOV-77 17:48 PAGE S4¥ 
CZRIEB.P11 O4-NOV-77 13:27 TY PORT ’A’ COMMAND SEIZE TEST & SET ‘vVv-A’ SEG 9054 
esss s RESKERSSSSRSSRRSERSRERESSESRERERESEERARRERSRERRHARARRKAERHEAEES 
580 i $SSUE READIN PRESET COMMAND AND SET FMT22 
1 010130 012760 Vv (RO) ;1 A READIN PRESET 
Bibi se p1s7e6 nite retake nov SFatSec BASE Roy BEY enrs 
be | FO Ld dll tababahalahahahahehabeleledelaialeieiehaialal 
2865 VERIFY THAT THE ORIVE STATUS IS CORRECT 





o10144 7 001 CLR CLEAR THE CHECK ERROR’ INDICATOR 
: 186 : i Bat iss Vv Re: REC TETER 3 ERROR MESSAGE 
zh tleire Biers Bie gplies = BBY onl eRe Tete TERTETTD FATHEB 
ce73 DIGeON Nera? AmeGr? SOLE aie Seve Seetir tg girs 
75 819535 ne in Bea foe 
Biss Bassas BOISES BBli>4 Bic H ‘SDE 1, ee RBSkED BITS 
10236 37 001174 O01124 Is POR’ WITH DATA FOR TYPEOUT 
ff ERmon 3 ihe eee 
001244 vos. | ot ote, R COMPARE ERROR INDICATOR 
bibses 513589 bots Bor es4 Rove PORT Bon ~— hove BORE aboRess TO LOCATION FOR TYPEOUT 


s pS AN ACARI ENOTES FAR OSE 
halt FOR TIMEOUT TO RELEASE DRIVE 


010270 005760 000012 1S: TST RPOS1 (RO) eR FOR_THE fa TO Tiis€é OUT 
010e74 001006 ON es wey He T OCCURS 
810678 get 001254 S TCH HECK an 

1 1372 
010304 104036 es OR mer id RTHIN 2 2 SECONDS 
0103068 000137 010624 $00 8 TN REGISTER CHECK 


+ SLESSRKSESSSRESESEERSSESSESSRSSHEERERSRARESRRRERRERRRRARRRLRAAE 
bce IF DRIVE RETURNED TO NEUTRAL 


010312 es: 
; VERIFY THAT THE DRIVE IS IN NEUTRAL 





BEAPRSRRERSaaaaaneenseeR TEES 





Biase CLR ; acd , iio CATOR 
1 001122 ; YPEOUT 
10 ADD ; Te 
i i BY i A H ea SON e Sekt 

i 1178 nov RP ty : th Pe i REGISTER FROM FORT A. 
6303 i ; 1 ey B Ca BATA a WS! eR) ; EA NDENT BITS FROM THE COPY 
29!1 618358 1 TT 38 MOV RPosit RO) 5 St : i eh Heri? REGISTER FROM PORT 3. 
291e 010402 013737 1166 MOV MPL iSGpy Tt 
2913 010410 042737 1166 BIC Stree 81 STHPL : CLEAR Poat 193 NBEAT BITS FROM THE COPY 


OS 


OL CTRLR LGC. MACY11 30(1046) O4-NOV-77 17:48 PAGE SS 


C2RJEBO 
O4-NOV-77 13:27 TY PORT *A’ COMMAND SEIZE TEST & SET ‘VV-A’ SEG COSs 


CZRIEB.P1 





g3} 3737 001164 001166 BNE iy ere ie Te ,ere REGISTER THE SAME FROM BOTH PORTS ” 
sa} 001164 S $ ye ae ARE THE SAME: ARE THEY ZERO ” 

531 OR 4Y 

291 $s 


Ia he He “ChE * NOT SEIZED 
oe ce 
re OR ERROR MESSAGE 


WN OWOnNTUS 





ERR 
retail ry 72S: nov oie : T ;SET 80 
132 00125 m0 ot Hak -_ pee SHOWS DRIVE NOT IN NEUTRAL 
: us E40 O FROM PORT A. 
Rov I a) F TEST SHOWS DR ORIVE NOT IN NEUTRAL 
DOL iee . Ts} HP : ati TATUS: EQ ZERO FROM PORT B. 
177777 001250 738: HOV i a heEeace — 
74S: Vv 


f TPE ERROR 
Mae a TLURE WHEN RPDS1 READ 
CK iar OR vv BIT 


he Le] 
388 38 8 
—e vu = 
823 ne 
500 888 
be bee eee hep 
— =e lat) 
oro oe 
32 
< “~3<< * ee 
NO N VOM Ss IA VM UNO N 
o 33 o£ 
5 
x 
a) 
3 
- 


Oe Oe be Be ae ae Be Pe Be ae pe Pe Bae ae aw ae me Oe Be Bee Pe Pe Pe PO PP on 


BS 001124 001170 ; ALL prfs 
er ele pagem PORT 8 
g : te: ae Gk REDS FOR BIT FAILURES - FROM PORT 8 
BLAZE BB1agG 755 EY RURTE. BARR ace" pORt funeee | 
190190 901178 BIC BATAIYV 3 MP3  ;DON’ CHECK ATTN BIT OR VV BIT 
16 1124 00117 bro GODAT, § MP3 ; SEE IF OF AD OK FROM PORT 8. 
Deeg a OR 7 PORT ERROR 
bes4 3s: «Scope ;LOOP ? 


: teste BORT BR’ COMMAND SEIZE TEST & SET ’VVlB" SPREE 
i ATE PORT 'B’ COMMAND SEIZE TEST & SET ‘Vv-B’ 


jAVERIFY aAt La Le | FELZED WHEN A COMMAND IS ISSUED. SET ‘vv" 


Muasesesaseec rire 


i # 

.# 
2953 :# A. IS AR C THR PORT 'B*. VERIFY THAT THE 
3364 is BRIVE WAS SeIZIED BY PORT "BAND THAT THE’'GO’ Bit RESET. 
2956 te B. N TC THR PORT 'B’. VERIFY THAT T 
BS 1g © TRME SE "PORIBORTERET GREMERD, THROUGH PomT ve". vERIFY THT THE 
2959 : : OND 
30 i Cc $TaL FOR OR 2 SECON S THEN VERIEY THAT THE PORT TIMEOUT RELEASED 
Sars 010626 {igre 
see oi oe3s 737 001274 : ago KyBCTL BR Te HT ONLY SINGLE TESTS ” 
2966 «(Ol L 1S BR iF weed ENT D TEST 
2967 0106.3 0091 oge6de IMP XEC iB TUR nex TEST NUMBER 
292 01064 12737 1 001274 1S: MOV #-1. KYBCTL :SET SINGL aes INDICATOR 
239 O1NESO 112737 O0000S OOllo0e 2$: MOVB aS, $TSTNM : TEST 


Be 
rin 
a 

2 


Oo00000 

— bee 

Rg5R 
FENre 


N 
~ 
tf 


DB Doa aww ws 


Bao Zuo 


a 


fu 
e 


: 


ssa 


é 


oo 


y 


We 


SECRREERCRER CRATE 


ee eer ar 
WONT WN CWO. 
OVONOOO0O000000000 
a a a a ig pg ns po op op os op ee pe 
FRONTERA SRS PSNR 


Sossssssss 


b+ b= b= b= b= Bb 0 FB bb 0 0 BO bb bb bb Pe ee 
TD ob ee he te ee be be ee ee ee 


RASmReE 


ppania 


OS 


R LGC  MACY11 30(1046) O4-NOV-77 17:46 PAGE 5B 
-NOV-77 13:2 TS PORT 'B’ COMMAND SEIZE TEST & SET ’vv-B’ SEG O0Sé 
12737 0107 0011 MOV at , $LP iL TEST ADDRESS 
1 US ARTE YER, PORT iL UR RE 
12737 001176 MOV ‘ 
185 SEH? aaoni0 TESTS Bile uke no, EBD gage PONTE 
6139 1226 Tea4 MOV  BTNBR doi BRE se TO LOCATION FOR TYPEOUT 
. DO a ak at 
:START THE TIMER 
005037 001252 CLR 3c EAR THE ELAPSED TIME COUNTER 
012737 003720 001254 MOV ise! WATCH 9 2000 MS 
013737 OOlee6 001236 MOV get DET :*SEIZED’ PORT Ss 


g SELES SERSERRSEREERKEKKRRSERREERRRSERKRERESRRESRRSRRRERRRRREREEEES 
: ISSUE DRIVE CLEAR COMMAND 


012760 000011 000000 MOV @11,RPCS1(RO) ;ISSUE A DRIVE CLEAR 


s SREKRKAKAKSLSAAKSAAKKSRSKEARRRRKERKSRKREKRARRRRRRRRAAARSSRRKARARKEES 
VERIFY THAT DRIVE SEIZED BY PORT B. 









MOVB TA, RPC (RO? TP 
MOV ORTA, PT rows Fa coors Ese TO CATION FOR TYPEOUT 
CLR ' aa CK ERROR Renaips 
MOV ae i if AY Bt ERROR MESSAGE 
ecR se it 
chr ; rate HW teh Bat 
ROR 2 ; 
oan COM KERR :SET T =r COMPARE ERROR INDICATOR 
10 ; nove PORTB, RPCS2(RO) T PORT 
areetd MOV PORTB, PT ihove "BOR ADORE S TO ATION FOR TYPEOUT 
K LEA T CK E INDICATOR 
001126 v (RO) T’ ;GET Sige NTS OF RPDS! 
N01 122 ; rt ERROR MESSAGE 
001124 !ORY, Sot R SHOULD BE 
001164 ; ter 5° os TO *STMPO* 
001164 STMPO ; F al BITS 
001164 : e 
cae Sede" PAlEca opr 
1124 > OR’ WITH 3 Por TYPEOUT 
a. ; a GISTER COMPARE ERROR INDICATOR 
11 Sov kp Rest (RO) par’ cLERe LORTENTS O sae academies 
il nov SBR ; FORM REG es TER RES 6 ae ERROR MESSAGE 


RO 
001124 MOV #4210, SGDDAT WHAT REGISTER EAOULD BE 


SRE 


8888s 
BBVER 


PareRe RaBUANDURRESsea Teese 


g 


O00000 


“ 
= b= bee fae Bee Bee 


eieietetetetstets 
NANNNNNN SY 
“N fWNe--OwWw 


S900 
monn’ 
—-OWOONMW 


za 


ee ee ep 
PRERRZORS 
LT) 


work 


OONONOOOOO000000000 
dd nd a ae ae a dT OS eT 
tater t= 


See 
£2254 
Emo Le 


011450 


011450 


O04-NOV- 


137 


eeoeten <£ 
qoeeysess y 


000240 


00S637 


» Macy 1 30(1046) O4-NOV-77 
13:2 TS 


601124 
ae 
001244 





001esc 


NN oo 
Bm oe ys a foo 
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17:48 PAGE S7 
PORT °B’ COMMAND SEIZE TEST & SET ‘VV-B’ 





SEL SHOPLET Ohta OHNE SEELATTOCQYTENTS To “st™PO" 
, 
Ean , $GODAT i 2 OR E Bask Bafa F FOR TYPEOUT 
a con KERR a Fae The RRR COMPARE ERROR INDICATOR 


5 REAKLFSRGERSRFLFASAPH PKL ELA SLASHER RERERRTAHKHSLEREAEHREKERRE BEEBE 
4) SSUE READIN PRESET COMMAND AND SET FMT22 


MOV (RO) ;1 A READIN PRESET 
MOV sFateec (RO)’; oP t rATS 


-HEFRSELEELHSHERFEMEAMHERREHRHRERESAEKEERKRRHRREG EAH ERELELAA AEE SE 
VERIFY THAT THE DRIVE STATUS IS CORRECT 





CLR 7iCLEBR THE 'CHECK ERROR’ INDICATOR 

MOV ONT NT OF RPOS 

MOV ‘Fob RE ISTER ERROR MESSAGE 

AOG T G STER SHOULD BE 

MOV TO *$TMPO’ 

BI ¢ F 

Cc HE 

BEG 

MOV 

I¢ CAKE BIT 

9 ie Hes eae TA Por TYPEOUT 

COM CKERR po T REGist STER COMPARE ERROR INDICATOR 

70S: ve 


MOV PORTA: PTNBR sO vi Bont ADDRESS TO LOCATION FOR TYPEOUT 


: SKEAAKAASHASARAKRKAAKAHRRKAAKSRRKERRSAKSRRKRRRRRRRERKARRRSRRRE EEE 
'UiAIT FOR TIMEOUT TO RELEASE DRIVE 


1$: TST RPOS1 (RO) ;WAIT FOR_THE PORT TO TIME OUT 
ene es erect ee He Ua ToH OCCURS 
S 7" ey 


BNE 1 
ss 36 ine iy ERO SECONDS 
JMP 3$ Pmt ATTN REGISTER CHECK 


3 SASARASAAABPAAARAAASAAARKKRSAAKKRLHRAKKRRSSKAERLSKASHRAAARAERHESE SHES 
4E IF DRIVE RETURNED TO NEUTRAL 


es: 
; VERIFY THAT THE DRIVE IS IN NEUTRAL 
CLR RELERR ;CLEAR THE “RELEASE ERROR * INDICATOR 


SEQ 0057 


218) 
BB 
hata 


SeCRSTERSE OE SIIISR 


OOOHIOONOO0O0ONO00000000000 


~ 


3 


he be ee ee pe ee 


SA Ey oa es 


wu 


2n 


WWWWWW 


OB Bt he Be ne Bm be Be Be Be hs ne Be bt ae Be ne ew Be ae ae am ae ee be bee Be ae es ee Bee ew 
SERLZORHBSSVORLOW Ooo VON LOW ODS URREORES 


PERRI ROON TRE 


AP EgwasS 
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Ds be be be be Be Be Be Be be be Be Pe he he Be Pe ae bes se bw pew Pe Be 
won 
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TRLR LGC. MACY11 30(1046) O4-NOV-77 17:48 PAGE S 
O4-NOV-77 3:2) re PORT ’B’ COMME Se 12e TEST & SET ’Vv-8" 


thee 001122 yin aR A, Ep peeve! FOR TYPEOUT 
11 001124 MOV H H H sapbet SON CONSTANT 
19 nove BORA, RecSec ag) 7 SEC “ 
11 V oo) 2 





60 ivy 
il 1164 MOV 5 ae pays ite ae Tee et 
1 4 BIC era Teese Ro : hy NOENT BITS FROM THE COPY 
00 172 nov BP ito) $1 3; 1 the TATUS REGISTER FROM PORT B. 
27 1001 1166 BIC SATA'VV,SIMP1  ;CLEAR P BITs FROM THE COPY 
37 001164 601166 chp st : THE ST AY DE Oe cteR THE SAME FROM BOTH PORTS ” 
732 001164 Tst THPO : et ARE THE SAME: ARE THEY ZERO ” 
ou - ERROR 4 . ; EPORT BR AT ee heehee OR NOT SEIZED 
ne 11 1126 72S: MOV Sthe :SET HE CHECKS RROR MESSAGE 
OL 237 B38 teas HOV ETN ao) ; ter 1 SHOWS DRIVE NOT IN NEUTRAL 
te . 
573? 001164 rot PORT, : F ms EQ O FROM PORT A. 
: 
ie BG BIG, OPS, BA Biel ol Rise ver vere 
08737 Bot fée Tet ee : ET F StAtUs. EQ ZERO FROM PORT B. 
theca 177777 001250 73S: " - #-1,RELERR ; Toe ERROR fe ESace 2b op NOICATOR 
Biarae OBZ SBLNGS 7S: ROY BIOTA. SARRET — HLOKCEOBGRE crsene® HEN RPDSL REMC 
6357 0000 991170 BIC 8ATA Stee : N’T SH CK THE ATTN BIT 
ee $GD0A a 
O40 5 BE ROR ? BR 1OK ERO — 7 
13737 901172 001126 75S: MOV THP3, SBDDAT ? CHECK RPDS FOR pit FAILURES - FROM PORT oC. 
13737 1226 001234 MOV ORT R :¢ P NUM 
042737 100000 O01i72 BIC #ATA, $TMP3 : DON" CHECK THE ATTN BIT 
023737 001124 001172 cnr ee STMP3 E IF oR AD OK FROM PORT B. 
104007 ERROR 1 ee ERROR 
000240 76S: NOP 
000604 3S: SCOPE ;LOOP ? 


3 Teer et TEST RELEASE DRIVE SEIZED BY PORT a 
; ATE TEST RELEASE, DRIVE SEIZED BY PORT ‘A’ 


i STEST THE OPERATION OF THE RELEASE COMMAND, DRIVE SEIZED 
A. SEIZE THE ORIVE THROUGH PORT ’A’ BY WRITING 0’S INTO RPDS1. 


i 

* 

# 

* B. ISSUE A RELEASE COMMAND THROUGH PORT’A’. VERIFY THAT THE DRIVE 
‘ a thy ned TO NEUTRAL, AND THAT NO ERRORS ARE INDICATED BY THE 

* 

“ 


ZRIEBO, OL CTRLR LGC MACY1I1 3011046) O4-NOV-77 17:48 PAGE 59 
CZRIEB.P11 O4-NOV-77 13:27 Té TEST RELEASE, DRIVE SEIZED BY PORT ‘A’ SEG 0059 


138 011764 ag ESP ma He HE 
40 1] 4 737 001274 TST KYBCTL ; ONLY SINGLE TESTS ” 
SRG Bist ee Bie Sear om 
45 11774 7 IMP EXEC : oer" ExT. TEST NUMBER 
SS Blage Se RF com ay RY, Seigtrner: | HeLitigen tot oleae 
eg flee He ihr HR ce OP be ee 
012036 012706 001100 TEST6: MOV sSTACK, SP i539, 4000. stack POSNTER 
; + SESSSSEKEESSERELEELAGEEAERRALA SESSLER ER RARER ERAALRKLA LAER ES 
t&TART THE TIMER 
012042 005037 001252 CLR TIME ;CLEAR THE ELAPSED TIME COUNTER 
Ole 012737 003720 001254 MOV #2000.,WATCH  ;SET WATCH TO 2000 MS 


Nee ee LLL ht kt kd atalalalelalalelehalelelaialeiahale 
;SEIZE THE ORIVE THROUGH PORT A 


Bisce2 13787 01804 Obiede HOV" POnrnyeetaht™ stone. Sezzine P PORT’S ADDRESS 
Bi 3787 8 é 001240 Ov BORTS, OPPRT iWGBPosT TE? PORT ADDRESS 
Ne Eh dL kkk kad halellaielehaleialalaielalale 
;RELEASE THE DRIVE FROM PORT A 


WI LILI WWW WL LIF) CW GF WIG) LI GI WI GY) CID WI WGI WII) WW WW WWW WW WWW WIG) WWI) WIL) WII) 
~ 
PB SBVRR Pow Owed Vord Zoid Ce WOME eUe ODED VU LU ODED BT 


a = Be ee a bm ee ee be Be Bs be be be he be be = 8 be = 


Bisite 13799 BBLER! BppaAe Rave BRRTR:BYRSE‘ "hove FEAT aBBRDS®. ro Locazzow rom rvecou 
012116 012760 000013 000000 MOV S1(RO)’ ;ISSUE RELEASE THROUGH PORT 
; VERIFY ne THE DRIVE IS IN NEUTRAL 

012124 005037 001250 CLR RELERR CL BR THE EA ERROR ’' INDICATOR 
012130 018737 900012 001122 MOV sRPDS1 , SBDADR iF OR RPDS1 FOR TYPEOUT 
Olelse 016737 011700 001124 MOV enya ' gr as 56 ae eg ee CONSTANT 
pistep bi eeayes eee ze MOV itro) t 2 Ive" STATUS REGISTER FROM PORT A. 
012164 Ot 7 17) 1164 MOV STMPe STMPO OPY i" NT pS THeo 

1ei7e 2737 300 fe 64 BIC BATAIYV $1 HEUER NDENT BITS FROM THE COPY 
01 bt 6 7 ; 0 40 nove PORTE RPCSE(RO) : mae VE TAT REGISTER FROM PORT B. 
Biers Bisa BOTI78 Sollee nov Srey Sued ior Th th HEA RUYF fecusTen From ont 
018290 25737 yet 65} tee ene STNPO. StMP1 3 THE OR TDS ENOENT 8 THE SAME F Pon BOTH PORTS ? 
biee4o 905737 001164 TST $TMPO 'R G STERS RS ARE THE SAME: ARE THEY ZERO ” 

1ee44 1037 BNE =} :8 
Cleeve 1O4O4E ERROR 46 !REPORT DRIVE NOT IN NEUTRAL OR NOT SEIZED 

93 Ol2250 000127 012434 IMP 70$ ‘BYPASS THE REST OF THE CHECKS 


ele] 





JEBO DL CTRLR LGC  MACY11 30(1046) 04-NOV-77 17:48 PAGE 60 
JEB.P1l O4-NOV-77 13:27 Té TEST RELEASE, VE SEIZED BY PORT ‘A’ SEG 0060 
19% 0o12254 0137 7 001170 1126 66S: MOV sTHe : T ;SET_UP POS IBLE BAD DATA FOR ERROR MESSAGE 
135 ie 1 g ? D0 1ee6 be4 HOV PORT PINE a9) IZING P R IF TEST SHOWS DRIVE NOT IN NEUTRAL 
13? ts 5737 Bol ies T i 1" i ; E Fee “EQ O FROM PORT A. 
199 O1 13737 0012 1234 MOV TA, PT :SEIZING PORT IF TEST DRIVE NOT IN NEUTRAL 
Set $leus Glee, BBLS BRAS Ble RANA RRRSTaoy ight Peeyrge Cem reo 
3505 13 v4 1166 rer Sin" : 8G TATUS EQ ZERO FROM PORT B. 
1e334 12 37 177777 OO12S0 67S: HOV #-1,RELERR : er EASE ERROR’ INDICATOR 
ome GER 12797 01170 oo1ize ces: Rov” Sire, senpat 00x FOR E17, FRILURES MEN RPDSI READ 
3208 018360 Oe? 37 100000 B61 f30 BIC BATA $tnee : F cHeck THE ATTN BIT 
3203 012366 023737 O0112e4 001170 CMP GODAT, -ALL gt S OK ? 
3517 bissce pudoe ERROR iREPORT ERROR OY 
3515 Bisuoe O19937 Boise ppiese °° hy Teg. perce’ «=: Se AS FOR SIT FATLUAES - FROM PORT 8. 
3214 012414 0427 37 100000 001172 BIC BATA, $TMP3 :DON’T CHECK THE ATTN BIT 
3215 0124 7 001124 001172 CMP $SODA , STMP3 i SEE IF AD OK FROM PORT B. 
3218 0124 140 BEG os :BR IF OK 
3513 ete bode4o 70S: ROP. . ‘sipcepsandbcgaies 
3219 016436 732 001250 7 ror RELERR 3D 0, iN RETURN TO NEUTRAL ” 
3553 ois 1 137 pa eee 010 dove isa RPCS2(RO) $69 Lect a a pee = eee 
ee ° 
3555 O1See BB} Sy Bo ea4 MOV PORTA, PT ;MO SS TO LOCATION FOR TYPEOUT 
Se ee Hee Be puis | Re mpage ALLE EEE coro ves 
3226 i oe 18 Bot ise MOV ; FORM COnTER ss be ERROR MESSAGE 
3227 O01 1122 ADD ;ADD_RH A Ss 
3228 012510 ll CLR H T 
es Geel? Burr Bie Balies = BY ieee sre 
3631 piss 3737 001124 001164 chp ; COM THE BITS 
3233 Ol 38 13737 001126 001174 MOV :COPY ’ DATA’ 
3234 012546 e737 490000 001174 BIC CLE MASKED BITS 
3235 O1e554 : 3 il 001124 BIS STMP4, SGDDAT j OR” Reseage a7 A FOR TYPEOUT 
3637 O1s5e4 005137 001244 i COM CKERR ‘SET T GISTER COMPARE ERROR INDICATOR 
3239 012572 ii 1226 000010 : Nove PORTB, RPCS2(RO) jSELECT PORT B 
3240 Bi Sebe 0137 1226 001234 Mov PORTB; PTNBR ;MOVE PORT ADDRES pO ebOCaT ION FOR TYPEOUT 
eae 1 12 1126 MOV (RO) tT’ ;GET CONTENTS OF RPDS1 
324 piel le B81 iss MOV ORPDS ; FORM REGISTER SS OF ERROR MESSAGE 
ee Bl 7 eites ce: per 'MebrSTER seouES ee 
3246 pispse i 33 11. 001164 MOV sop08T TMPO MOVE G11 R aeoe 8 8 TO *STMPO’ 
3247 012644 737 0 001164 BIC StCATA,STMPO ;SAVE SPECIFIED BITS 
3048 OlebSe 023737 001124 O01164 CMP $GDDAT ’ $TMPO ;COMPARE THE BITS 
3249 O12660 001414 BEG 73S :BR IF OK 


MACY11 30(1046) 
:27 


aera = 

ietatat 
~_ 

Corus 


Bees 


O4-NOV-77 17:48 61 
Té TEST RELEASE, IVE SEIZED BY PORT ’A’ 


MOV SBODAT, STMPY ;COPY_’ DATA 
BIC BATA, STMPY : CLEAR MASKED BITS 
Is STMP4 , SGDDAT :'OR’ WITH DATA FOR TYPEOUT 
OR 4 :TYPE_MES 17 
_ COM KERR :SET T GISTER COMPARE ERROR INDICATOR 
; IMP 2s ;GO CHECK FOR LOOP ON ERROR 
iF RELEASE COMMAND DION’T RELEASE THE DRIVE WAIT OR Tie pont T 
i RELEASE COM OMMAND DION’ T RELEASE THE DRIVE, WAIT FOR THE PORT TIMEOUT 
MOVB PORTB, RP $2(RO} BR LECT PORT B 
MOV PORTE P ; MOVE | pH O LOCATION FOR TYPEOUT 
TST RPDS1 Han TOR Our 19 oRELEASE DRIVE 
BNE + OR WHE SED 
TST WATCH j CHECK TH 
BNE 1$ :BR TF ANS BERG” 
ERROR 36 :NO TIMEOUT WITHIN 2 SECONDS 
2s: SCOPE ‘LOOP ? 
: itect 7 TEST RELEASE ORIVE SELZED BY PORT a eee 
; ATE TEST RELEASE, DRIVE SEIZED BY PORT ’B’ 
i STEST THE OPERATION OF THE RELEASE COMMAND, DRIVE SEIZED 
i A. SEIZE THE DRIVE THROUGH PORT ’B’ BY WRITING O’S INTO RPDS1. 
:# B. ISSUE A RELEASE COMMAND THROUGH PORT ’B’. VERIFY THAT THE DRIVE 
# RETURNED O NEUTRAL, AND THAT NO ERRORS ARE INDICATED BY THE 
> 
jiteteteeenneeeennenneenensnesenenenenensenenenennnenensnanenenes 
TST KYBCTL RF NG ONLY SINGLE TESTS ? 
m va 
BPL i$ $B if JUST T ENTERED TE TES 
IMP TURN & NEX 7 NUMBER 
1$: MOV 8-1, KYBCTL T SINGLE TEST IND gat 
2s: VB ST R 


nov +4 $s 81 PADR Teeth T S 

MOV steal? PERR ‘TOAD + O8p On ROR AODRESS 
MOV #4000.'S$TIMES :;D0 4000. ITE 

TEST7: MOV sSTACK; SP :LOAD THE STACK MOOINTER 


g « SLERSESRSKSRESRREREKEREKRSASRSKRSKREKREKRELRRRREARRERRRRERRARRESHRHREE 
‘START THE TIMER 


CLR TIME s CLEAR THE ELAPSED TIME COUNTER 
MOV #2000. , WATCH SET WATCH TO 2000 MS 


jp RERRERE ARERR RRRERERER EERE EERE EE RERE RRR ER EERE AEE EERE REEL RREE ES 
;SEIZE THE DRIVE THROUGH PORT B 


KOS 
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ole] 
: 
te 
mr 
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tatAtAtRy at Aya 


bh hb be ae be be ee 
0 0 NOUS Wt O 
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~ 
£ 


he a ee 


SRLFENRS 


WWWWWWWWW) 


paca BASE E ASAE 


QaaI2e23 2222 suena soem aI 


NOOOOOOOOOOOOOOOOOOOOOOOOOOOGOOO0O000000000 


ee ee ee te ae ae ae ae ee Be be ae ee an ee Be me ee Be ae ee Be ee eo ee 
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62 

O4-NOV-77 13:2 TEST Vévease. IVE SEIZED BY PORT ’B’ SEG 9062 
13760 1226 000010 MOVB PORT (RO) ; 
Bios eg 001236 nov PORTE cig st RE Atos ZING & Bort: ’S ADDRESS 
01 989 24 001240 mov BPD ‘ P port ADDRESS 

fp SAARAAAAASSS SEALS S LALLA EA LASS SERRE E RARER ARARAAAERARSLA LESS 

;RELEASE THE DRIVE FROM PORT B 

001226 010 MOVB RPCS2( RO) T POR 
001226 pore a4 MOV PORTB. PT SE ECT DOR Ee TO LOCATION FOR TYPEOUT 

000000 #13,RPCS1(RO)’ nove _BOR RELEASE THR HROUGH PORT B 
;VERIFY THAT THE DRIVE IS IN NEUTRAL 


OER THE THE onntee be ERROR ’ INDICATOR 
Broneee: FOR TYPEOUT 


' evi ye é fe eat’ CONSTANT 


2 iG HE tae $t ATUS REGISTER FROM PORT A. 


8 
= 
= 
ie) 
oe 
Zz 


BARRSIn Pew 
33 






ze 
i 
35 
eee 
Sn 


Os : beer Pon PENDENT BITS FROM THE COPY 
1 117 MOV tro) 3: TaTUS REGISTER FROM PORT B. 
glee, ite Bice nov SimBs, Ste Ss Bh Fae Suan eearsten ran vo 
I * 
G27 bear tes 01166 CMP TMPO, STMP1 : ne Site eee THE SAME FROM BOTH PORTS ? 
001164 eat stnPo : of STE ARE THE SAME: ARE THEY ZERO ” 
= RROR 7s ; NOT PA UTRAL OR NOT SEIZED 
il 001126 66S: MOV § MP2, T ; He CHECKS RROR MESSAGE 
1226 001234 MOV ORTB,; ; 1 eHOWs DRIVE NOT IN NEUTRAL 
05737 nun --* a ee | Fe EQ 0 FROM PORT A. 
1414 7 : 
13737 Qo1224 901234 HOV —-ORTA, PTNBR a sah F REST SHOWS DRIVE NOT IN NEUTRAL 
137ep Oplles SBAGS Ble RaeraAPEStno> foPtcP Pom tals 
ratte 001166 ret SIMPL ; re q me EQ ZERO FROM PORT B. 
177777 001250 67S: MOV #-1,RELERR ; EASE ERROR’ INDICATOR 
i ERROR 6 : SPE. E OR MESSAGE 26 
13737 001170 001126 68S: MOV TMP2, SBDDAT ;LOOK FOR ay AILURES WHEN RPDS1 READ 
01 001224 001234 MOV ORTA! PTNBR ; CHANGE NUMBE 
001170 BIC #ATA $m : DON’ T CHECK THE ATTN BIT 
1 age SUbsry Seo aa ie: Bat FOR OK oon PORT A. 
ea ERROR POR 
ye ae 137 9011 69S: nov STMPS, ar ig CK REDS1 FOR BIT FAILURES - FROM PORT B. 
37 1000 001172 BIC sATA, $TMP3 CON’ Tec CHECK THE ATTN BIT 
023737 001124 001172 cn SGDOAT, STMP3 SEE I IF READ OK FROM PORT 8. 


“Beatier7 Tse er 1PM Teer RELEASE DRIVE SEIZED BY PORT 'B’ SEG 0063 


cfajes. Pal 








l 
3363 134 2 a ERROR 7 ;REPORT ERROR 
4 Ol F TST RELERR ;DID ap VE RETURN TO NEUTRAL ? 
1 oe . +6 ; 
i 900010 Move PORT sBecsE (RO) e FOR Dive on 
g : #6 26 1234 Ov ORT * PTNBR fs TO a FOR TYPEOUT 
1 1126 MOV 
7 i 11 BD Pail OTER Bt ERROR MESSAGE 
7 1 Cc 
3374 i 1164 Rov aur. *$TMPO’ 
33 1 1164 Cc 
3335 1 BEQ 
Ha pee im BY et eee 
: a4 1124 B15 Ne WITH Boat For TYPEOUT 
3380 i 26 -_ con KERR ‘ort Er we SSetete R COMPARE ERROR INDICATOR 
3384 O1 0 : MOVB TA, RPC (RO), T 
3385 i BB poss nov TR, PT i Beet aeons Ess a LOCATION FOR. TYPEOUT 
338° 1 1126 MOV 
3388 1361 1l2e MOV a ‘ oT ¥ es BeBe ERROR MESSAGE 
3386 biseee CCR hate 
339 13686 1164 MOV T, STMPO NTS TO ’STMPO’ 
1 1164 BIC StCATA, STMPO 
1364. 1164 CMP GDDAT; $TMPO 
3304 0136 BEQ 
339S 0136 1174 MOV TMPY ie Bap 
33% O01 1174 BIC OAS ties ioe. “Bap PASKED BITS 
3332 i 3066 1124 BIS on $I STNPa SGDDAT ; OBE WITH GOOD DATA FOR TYPEOUT 
3339 : 76 man Con CKERR ?SET THE sare isteR COMPARE ERROR INDICATOR 
3401 013704 ; IMP 2s ;GO CHECK FOR LOOP ON ERROR 
one 5 + SEESKSEKSSSESRSASSASRSKSAASSERAS EKER ERERERREKARSRALARRSLRKLES 
3408 iF F RELEASE COMMAND AND D OI DON’T RELEASE THE DRIVE, WAIT FOR THE PORT TIMEOUT 
3406 
Supa $1371 113760 oo1224 ooo010 is: Move PORTA, RPCS2(RO) T PORT A 
3408 1316 13939 O00i224 001234 MOV PORTA BINDS vi BRE of YE OuT TO LOCATION FOR TYPEOUT 
3410 13750 780 000012 TST RPDS1{RO) novia FOR TIO REL LEASE DRIVE 
Big i i, eee Ri isn aes me gels 
3414 613548 Opdase BREOR 36 +NO fimeOUT WITHIN 2 SECONDS 
3415 013742 o00004 2s: SCOPE :LOOP ? 
3417 


CZRJEBO, DL CTRLR LGC mcr yi 30( 1046) ta a by ene 64 
C2RIEB. P11 O4-NOV-77 13:2 T10 TEST RELEASE THROUGH PORT ’A’, DRIVE IN NEUTRAL SEG 0064 


B-4-5-4-hadinh -taahaahahadal-+-b-+-tab-+-bab-5-4-1-hab-boh-4-tnd -betad-4-$-4-hahh-trhaiad -$-4-hpl tal Srhabeh—ieh-5-S- halal 
jkTest 10 TEST RELEASE THROUGH PORT 'A’, DRIVE IN NEUTRAL 


;*# 
;#TEST OPERATION OF RELEASE COMMAND, DRIVE IN NEUTRAL 
:# . ISSUE A RELEASE COMMAND THROUGH PORT ’A’ WITH THE DRIVE IN 


oe 
20D 


:* NEUTRAL; VERIFY THAT THE DRIVE REMAINS IN NEUTRAL. 

a eT re 
rn a aan 1. lal 
fissar beemio SBNGS 3H | ve HAAWBH  HELrribenTeaT note” 


BIRRZ GR BSS VRR FOr oo 


BY HRHE RE 98 oir Tie sit 

TESTIO: nov at & one the sais bo TRTER 

sei Big mov PORTA,ETN ho tL te Slut BEET HPNaEOR ad PEQL™ 
ict i cae eee 
SESSUE A RELEASE COMMAND 

012760 000013 oD0000 MOV 813,RPCSI(RO)  ;ISSUE A RELEASE COMMAND 


FY s SHERKSKELAKSSAEKAESASEKSKSEAERESASKEKERAEKHRRSRRRARERSRERERSRERREREEE 
;VERIFY THAT THE DRIVE IS STILL IN NEUTRAL 


SELL LEE 
OOOOOOO 0000000 


bb b= be be bb Fh b= he 


° 
2 peRsSesNaae? 
a 
ages 
Reyes 
g BEsee 
o fore 
Ss <<< 
eee 


; VERIFY THAT THE DRIVE IS IN NEUTRAL 


aig En FWP 


OMPPARE SON CONSTANT 


ae 
= 
ss 
8 


* \* we STATUS REGISTER FROM PORT A. 

fon a pENOENT BITS FROM THE COPY 

"he ty STATUS REGISTER FROM PORT B. 
IT INTO 


The FATUS REGISTER THE SAME FROM BOTH PORTS ° 





RA Sicsiscear actuate estes is 


ek eee oe ee oe ee ad 


000000 OOOOOCOOOOOO0O000 
= bs Ob bh bm 0 be be bo be bP pe be pe 
SESEESESSELELSLEIELLIS 
Ve ERO ere 
Buea 
85 
oe 
<£ 
=+° 
= 
= 


001164 Pe Thro £ ie ; ARE THE SAME: ARE THEY ZERO ? 
a Fagor See RORY P"E te JM igurna,, ge NOT SeTzED 
Biri Sliete Bis, BRIS mouse Ss GY Reg peeger EL UR URRIPGE Pe TDATAEOR ERROR WESSAGE 
3473 eié 113760 O0l226 o00010 MOVB PORTB, RPCS2(RO) ee LEc TpoRT 8 


ESRIEB P11 ° GN-NOV- 


ee te ee Be ee em 





a ee ee ee 


ba ee 


01 


446E 


: 
B 





012760 000013 


30( 1046) 





BY. 


NOS 





O4-NOV-77 4 
T10 TEST bean Shree PORT 'A’, ORIVE IN NEUTRAL 
ae ; idee TATUS EQ O FROM PORT A. 
ts cee, ;SE121 F TEST enES! SHOuS,,DR DRIVE NOT IN NEUTRAL 
Rove rR (RO) ; 
rst STHPl ; ae EQ ZERO FROM PORT B. 
65S: nov 8-1, RELERR ; Re Seace. NDICATOR 
66S Rov. aya Binge ; OR Pea WHEN RPDSI READ 
1¢ A $tne ; Oe ma BIT 
, STMP2 ; ook ? 
9 0K PORT A. 
67S: no Bynre Finer ; Ronee gIT FAILURES - FROM PORT B. 
TA, $TMP ; ’ Sar tetas Ors THE BTIN T 
ate PACK te Bont T B. 
a ERROR _ i Beebe r. OE RROR 
: SCOPE ;LOOP ? 
3 peesesenenaunnnsnesness ener THROUGH PORT 'B’. DRIVE IN NEUTRAL 
; ATES il TEST RELEASE THROUGH PORT 'B’, ORIVE IN NEUT 


isTEST OPERATION OF RELEASE COMMAND, DRIVE IN NEUTRAL 
f A. TESUE FREE OEE Sear THe DRive ee In eum 


ib Mb Mb ae a Ae Ob aE bab aE aE aE a aa a a aaa aE aE a aE a EERE ERE 


Fait Ist KYBCTL ; vat NG ONLY SINGLE TESTS ” 
; F JUST EN ne T 
i$: HOV Stith ; ay Ui ne ate _ 
. $ 

HOV A LPERR :LOa gt on ERROR ADDRESS 

TESTII1: MOV ee ‘60m ares Tack BOTRTER 
MOV , nove ESS TO LOCATION FOR TYPEOUT 
MOV PORT WHICH WILL ISSUE RELEASE 


3 i ke meme. snawnchaate oneal ame Sosetea te 
ESSUE A A RELEASE COMMAND 


MOV #13,RPCS1(RO)  ;ISSUE A RELEASE COMMAND 


3 + SSSR SESESESSAESSERRERESESSASRARHSKEALSLRRARAAARHLAARAAARAAAA EES 
VERIFY THAT THE DRIVE IS STILL IN NEUTRAL 


SEQ 06S 


B06 
CZRTEBO, OL CTRER LGC» BACIEL SOC LONG) OY-NOV- 77 eT RELEASE THROUGH PORT 'B’, DRIVE IN NEUTRAL SEO COKE 


; VERIFY THAT THE DRIVE IS IN NEUTRAL 





14474 CLR sCLEAR THE ’ NOICATOR 
i 001122 Ov : THE La 1 ron TOE OuT 
24 v iw ae RES eran 
: ‘ 1178 y 8 te : He at REGISTER FROM PORT A. 
40 i ay B Co : oe T — BITS FROM THE COPY 
2 1Wa56 : ti?e nov 8 ; fhe Ont _ REGISTER FROM PORT B. 
3ou4 1 1 1166 Bic > CLEAR BITS FROM THE COPY 
45 ! 1164 1166 : ae tins oTeR THE SAME F on BOTH PORTS ” 
317 1ve18 001164 FoF ; ARE THE SAME: ARE THEY ZERO ” 
3249 ive ERROR ; aT ee he eet QR NOT SEIZED 
32 1 ri90 1126 64S: MOV MPe, T : He CHECKS ERROR MESSAGE 
35 i 1g 1 MOV TB; : EST SHOWS DRIVE NOT IN NEUTRAL 
35 146 1 10 MOVE § PORTB,RPCS2(RO) ; ne if 
3254 i 1164 T r ie ; F_ STATUS EQ 0 FROM PORT A. 
1 0012: 1234 MOV TA, PT : DRIVE NOT IN NEUTRAL 
is Bites BBS i BUMEEARSTnos fePtPeteoerege Omen Whe oot 
ts 7 
14 001166 tet STHP1" ; ; F STATUS EQ ZERO FROM PORT B. 
1 14708 177777, 001250 65S: HOV #-1,RELERR : Tee PRO c * INDICATOR 
ce 147 4 1170 138 66S: nov Siors: nee” ; OR My A Une WHEN RPDS1 READ 
es 
3565 O14 001170 IC BATA $rne DON’ MUROER BIT 
se) 14736 1124 001170 MP a ,STMP2 : “yp oR Ok ” oun’ 
14 OR ; TERROR 
376 Bis : 1172 1388 67S: mov Byare. Binee > CHECK RPS FOR BIT FAILURES - FROM PORT B. 
71 014764 i 1172 BIC TR $tnp ; ce POR! THE ATTN BIT 
O14 3737 001124 1172 Cc SGDOA , STMPS > SEE IF READ OK FROM PORT B. 
bie 4002 Bon | + Oe ORT ERROR 
015004 od00240 68S: ‘ 
015006 SCOPE ;LOOP ? 


ODN 


[SEE EATS HR RRR T HEMT CLEAR’ DOES NOT CAUSE RELEASE FROM POR 


j ATES TEST THAT 'CLEAR’ DOES NOT CAUSE RELEASE FROM PORT °A’ 
j AVERIFY THAT A OR DRIVE CLEAR WILL NOT CAUSE THE SEIZING 
a PORT TO PELE RSE CHE BR ive” 


Ww 
wn 


Paar RC 
RESO B Sa od Zan 


7% 
;# A. SEIZE THE ORIVE BY WRITING 0’S INTO RPDS1 THROUGH PORT ‘A’. 


CZRJEBO, DL CTRLR LGC _ MACY11 30(1046) _O4-NOV-77 48 PAGE 67 
CZRIEB.P11 O4-! 7 13:27 Tle test! tha , DOES NOT CAUSE RELEASE FROM PORT 'A’ SEO GOE7 
3596 # VERIFY THAT THE DRIVE HAS BEEN SEIZED. ’ 
3586 te B. A PORT ’A’ AND VERIFY THAT THE ORIV: 
ae if ISSUE A DRIVE C CLEAR waihe UGH VERI HE DRIVE 
91 :# C. ISSUE A EAR THROUGH THE RH11 AND VERIFY THAT THE ORIVE 
eu 1 DBREAS "READER PS"RE TAD 
34 :# OD. E T HE a’ RIFY THAT T 
3232 if REFERED 45 RE iYhad Roe AT N NETS 1SHER xR ENTION BIT ise 
3238 : © 9k Mb Abb ab Be ME Mb Mb A AE aE Eb A a a aa aaa aa aaa aaa EE 
3299 rete 737 001274 teri: TST KYBCTL ONLY SINGLE TESTS ” 
& 
Soo GIEGIS Berke ge : Ase 
1 015016 1 1 F JUST MeN EEF ure 
1 IMP EXEC ; 
1 i 006805 901274 1g: Vv #-1,K Th a IND taToR 
1 yt 7 00018 901102 : vB 8 $1 it 
1 127 1 0011 MOV ‘ 12, SLPADR iL ERagR aooReS 
618054 B18737 00 pes BbLie HOY «supBO<Stimes ic Be — 
12be2 127 il TEST12: MOV aS Pe ic sie 7ER 


verti tml clare siti sc 9 
;SEIZE THE ORIVE THROUGH PORT A 


Bor 236 HOV a rt taal a. NG PORT" S ADDRESS 
PORTS. RPCSE 


Ronove 


ONOWU £Wl-O 


nit 


MARAIS SAAC 


PPro et 
= 
<< 


BooRESS FOR TYPEOUT 


SBy PORT A 
ot ADDRESS 
mt 










. ee Se 2G 2G ee 
vd 


— 


a 


+ 


ER LEAKE TRB 


WUT UT 


ee 


T ae THE SUBTEST 

64S: 

g 10 LOCATION FOR TYPEOUT 
no 5 CORRECT STATUS 
CTED STATUS 


yee SOO 
88888-888 
re 
Sct Fee 
33 
< <$ 
vv 


bs ae ee Bee ee be ee ee Be Bee Bee Fn ae fe ee Pe Pe Be Be Be he Be Pe 


4 1 
Z it con aie i TE D STATUS 
ai 2 1166 651 Big Pisin i GRE THe EXPE i Bi Sanus BITS SET ? 
32 a Bra, ooh Ertan hd fio 
3633 015260 1049 ROR 5 EPORT THE ERROR 
340 te 4 ess: NOP 
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CZRJEB. bit O4-NOV-77 13:27 Tle TEST THAT 'CLEAR’ DOES NOT CAUSE RELEASE FROM PORT 'A’ SEG O0&8 













3642 EHP EREEKERAAESHEHERKRHKHA HEHEHE EERKEEKESREHRLHRERHARELHEREE ELE EH ES 
3643  ORIVE CLEAR THROUGH PORT A FIRST 
ee 01S264 012760 000011 000000 MOV @11,RPCS1(RO)  ;ISSUE ORIVE CLEAR THROUGH PORT A 
3 s SRERSLERESSSSSSSKSEREKSASKEREKASSSRSHRARRRRRRAARSRRAHERARRESRRSKRES 
3648 VERIFY THAT DRIVE STILL SEIZED BY PORT A 
36 1S$27 10 MOVB » BPC (nO) T T 
3651 Bt e8c5 eee MOV etd hovk “Bont SS TO LOCATION FOR TYPEOUT 
1 CLR LEOR T *CHECK E * INDICATOR 
1 001126 Vv 10) Ear Lee TENT 
1 0011 MOV BDAOF 'e he STER S ERROR MESSAGE 
3655 01 ADF 3 RH s 
3058 1 CL ; WHAT T Be 
36 1 001164 MOV T, STMPO : TER NTS TO 'STMPO’ 
3658 O01 001164 BIC ; F Be IT 
3659 O01 001164 : HE BIT 
3660 O01 BEQ ;R IF 
3661 O1 001174 MOV ‘ ;COPY 
3662 0153 001174 BIC TMPY i¢ LEAR PASKED BITS 
3663 Bi Bios 001124 BIS is Pei FOR TYPEOUT 
3665 O01 “0g COM ei T GISTER COMPARE ERROR INDICATOR 
see Ble es 
15414 000010 VB 
3668 0154 001234 MOV Ese TO LOCATION FOR TYPEOUT 
3659 154 CLR nove CHECK E * INDICATOR 
36 154 001126 V T OF 
78 i 435 00112. MOV ; ERROR MESSAGE 
3673 Ol 001124 HOV tory! G?sreR SHOULD BE 
3674 O1 001164 MOV ; N O ’STMPO’ 
3675S 0154 001164 Bic ; 
3678 15476 001 164 ; 
367 1 BEO 7BR I 
3°78 1 001174 MOV : 
3 15514 001174 Cc ; an ED PA? 
3681 0188 a ne j7OR WITH A FOR TYPEOUT 
36 1 Cc :SET T GISTER COMPARE ERROR INDICATOR 
es BEE BB cos: A 
368S eee ee ee ee Terenas 
3686 how I SSUE MASSBUS INIT 
3688 O1SS4O 012760 oO00040 000010 MOV SCLR,RPCS2(RO) ;ISSUE MASSBUS INIT 
36390 8 jeusvouceecrssrr att stan ih icataTTe 
3631  AONFI RM THAT DRIVE STILL SEIZED BY PORT 
3693 O1SS46 1137 1226 000010 MOVB POR RECS S2(RO) T PORT 
3694 Biss58 137 iS5e bo1234 MOV eae ;move PORT AbORE OCATION FOR TYPEOUT 
3695 015562 7 244 CLR ; LEAR BECK ° ROR’ INDICATOR 
369] O15S6— 016037 Clie 001126 MOV RPS S1(RO), SBDDAT ET rhe NTS OF RPOS1 
3697 O15€74 012737 OO000l2 OOllee MOV #RPDS1,$BDADR ;FORM REGISTER ADDRESS OF ERROR MESSAGE 
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CZ2RIEB. P11 O4-NOV-77 Tra? Tle TEST THAT 'CLEAR’ DOES NOT CAUSE RELEASE FROM PORT ’A’ SEG 0069 

36 1 7 1122 AD R 
3533 1 7 11 cL AAT e Bee 

oo O01 1 11 1164 MOV T sTHPO iH TENT TO ’STMPO’ 
37 1 7 1164 BI #tC777?7,SIMPO ;SA 
3 : g 4 il 1164 cn $ T, StMPO 5 COME 
3704 O1 13737 1126 001174 MOV T, STMPY :COPY ’ 
370S 015644 737 o01174 C 877777. SIMPY CLE AR SKED 81 § 
3708 1 7 901124 TMP4, AT i Sok ’ WIT A FOR TYPEOUT 
37 1 OR : TYPE "est 
3708 Ol 7 COM KERR :SET T ER COMPARE ERROR INDICATOR 
3593 013676 9 “OS: = hove TA. BPCSE(RO) 
3711 015676 eet MOV ; SELEST OCATION FOR TYPEOUT 
3712 015704 CLR ; KE * INDICATOR 
3713 015710 001126 MOV ) a 
3714 015716 001122 MOV ERROR MESSAGE 
3715S 0157, ADD 
3716 0157 001124 MOV STER SHOULD BE 
371 157 001164 MOV TEN 0 *$TMPO’ 
3718 1e744 001164 Bic 
371 1 001164 MP 
3720 0157 BEG 
ve Ble ane ae p Pee 

sie 

3723 015 001124 IS. BARA Por TYPEOUT 
375¢ 5 OM ‘ore at sat COMPARE ERROR INDICATOR 
3786 016012 72S: NOP 
3768 ;RELEASE THE DRIVE FROM PORT A 
3730 016014 0010 MOVB PORTA, Rec (RO) T PORT A 
3731 016022 Boi23 MOV PORTA.P nové Boat S TO LOCATION FOR TYPEOUT 
373¢ 016030 0000 MOV #13, APCS I TROD SSUE RELEASE THROUGH PORT A 
3734 ; VERIFY THAT THE DRIVE IS IN NEUTRAL 
37 160 7 CLR iC ERROR ’ INDICATOR 
37 pt eBas 673935 rt 001122 MOV ie ne he RPDS 1 FOR TYPEOUT 
3738 016050 060037 ie ADD : °, CORP Senta 
ag Bites Titres Bhim GOMES Fle BNA a pole 
3741 Ol 1 1170 MOV tO : Wed REGISTER FROM PORT A. 
374 1 1 i 1164 MOV § iC 
374 16104 1 1164 BIC BATAIYY 3¢ NOENT BITS FROM THE COPY 
37a 161 137 49 MO T ta i 

45 O161 1 I 11 MOV 80) i vi iy TATUS REGISTER FROM PORT B. 
7 161 1 1 1166 MOV ST vet 3C 

74 161 7 1001 1166 BI BATAIYY STHP I * ie PENDENT BITS FROM THE COP 
3748 1614 a7 001164 O01166 C $iNPO, $ stmp ; fhe ONT STER THE SAME FROM BOTH PORTS ” 
37 161 737 001164 TS TMPO ; TER ARE THE SAME: ARE THEY ZERO ” 
3751 0161 104S BNE 6$ ioe 
3752 0161 LO4O46 RROR 46 EP 1 ORIVE NOT IN NEUTRAL OR NOT SEIZED 
3753 016162 000137 0163te2 IMP 78S :BYPASS THE REST OF THE CHECKS 


C2RIEBO OL CTRLR GC MACY 11 30( 1046) a NOV-77 17:4 PAGE 70 
CZRJEB.P11 V-77 13:2 Tle TEST THAT ’CLEAR’ DOES NOT CAUSE RELEASE FROM PORT ’A’ SEG 9070 
4 Ql61 13737 1 001126 74S: MOV s7me : T : DATA FOR ERROR MESSAGE 

35ee aT 13737 132 B01 4 MOV sont ‘BENGE : iat NG ab id oP g, SHOWS DRIVE NOT IN NEUTRAL 
3756 O1 ll 780 1 060010 MOVB sine »RPCS2(RO) ; T 8. 
32 ? wae B34 4 1164 T i : A EQ O FROM PORT A. 
3788 16216 137397 001224 001234 MOV pire, PTNBR >SEIZI T IF TEST DRIVE NOT IN NEUTRAL 
760 O1 0137 01122 901126 MOV st ne $8008 ;? TA’ FOR ERROR TYPE OUT 

61 Ol 001224 I A0VB ORT, (RO) ; Sal 

ebe i 7 001166 ist if : mY ATUS EQ ZERO FROM PORT B. 

1 1 9 77777 75S: v 1 BELERR : 1 SRELE ERROR’ INDICATOR 

3765 016254 O1 ii 0 Vv #11; REC 1(RO) CLEAR 

76 ie . ERROR fhe. , HVPE ERROR 3 26 
37 1 1 001170 O01 76S: MOV MP T : OR : Alt S WHEN RPDS1 READ 
3753 i 7 a0 28 001 258 ate PORTA, BIN ; vy FoR THE eR BIT 

a6 e 

3771 OLe3i9 25737 1124 001170 eg nf : pits OK OK 
3772 016322 1401 BEQ ; F OK PRON PORT A. 
3773 016324 04097 ERROR ; 
3774 163¢6 1 001172 001126 77S: MOV T ae FOR BIT FAILURES - FROM PORT B. 
3775 O16 13737 OOlee6 001234 MOV 3C + RUMBER 
37 016342 37 y90599 001172 IC arise ;DON’T T CHECK THE ATTN BIT 
3558 016350 023737 1124 00117 MP a Hites F READ OK FROM PORT B. 
3778 016356 00140 Q Roe OK 
3779 016360 10400 ERROR T ERROR 
3780 016362 O00240 78S: 
3781 016364 900004 1$: SCOPE ane ? 
3783 H fect 13 TEST THAT CLEAR’ DOES NOT CAUSE RELEASE FROM POR 
3784 j ATE TEST THAT *CLEAR’ DOES NOT CAUSE RELEASE FROM PORT ‘B’ 
3786 : SVERIFY THAT A LEAR DRIVE CLEAR WILL NOT CAUSE THE SEIZING 
3787 i PORT TO RELEASE $hE DRIVES 
3789 :# AL Y WRITING NTO RPDS1 THROUGH PORT ’B’. 
08 if & SERTFV WGP WE BR VE TMA ORR L728 
3792 :* 2B. DRIVE CLEAR THROUGH PORT ’B’ AND VERIFY THAT THE DRIVE 
Las + b3es NOT RETURN O NEUTRAL. 
3795 :# 6C. EAR THROUGH THE RH11 AND VERIFY THAT THE DRIVE 
330 15S BBRUEGITREPERR SOREL TaRCS 
3738 :# OD. RELE THE DRIVE THROUGH *B’ RIFY THAT THE DRIVE 
3739 i RET ERRED T CEA TRAL AND THA RNEI HER ATTENTION BIT IS SET. 
ok H RKAAASERSLAAAKESASSHAKSAKARSKKAHRERARKARRKSRRKRKRKERRRSRRRRRRRERREREE 
3605 005737 001274 e113: TST KYBCTL ; PERFORMING ONLY SINGLE TESTS ? 
3804 372 001406 BEQ 2 Be 


we 
AR 
= 
o 
< 


016 

bie 
3805 Ole 374 BP. FY N D 
Fett] 16376 005605 JM exec RETOR ioe neXt Test. NUMBER 
2807 O16 le 1777 1274 : #-1,K MAL is T TSINGLE. TEST INDICATOR 

O16 12737 000013 001102 MOVB #13 $T3T 

O16 12737 016440 001106 eTEST13, SLPADR ; LOAD LOOP” BN TEST ADDRESS 


a 
mr 
> 


DOOOBMODo DD 
Ob bb bo Bs bb ee 
WONTON LWM-O | 


Aegtas fees euacnnvene Sun nNiaees 


3851 


RERPRUEUIODS 


OL. CT 


££ 
NO 
£ 


CROOK OOK TCC 
ure 
£ 


yp p's 
Ei 


ba 
Shee 


o 
uw 
NX 


a 


Oe te Dae ae ee Be ae fe ae ee be ee be ee ee 


woe 


DOOOOOOOOOOOOOOOOO0000000000 


+ 
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Bis737 


012706 


N“ 
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Bo7e40 


001100 
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PProrrt sero 


PERE En 
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| oe 
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ooco00 
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71 
TEST THAT ’CLEAR’ DOES NOT CAUSE RELEASE FROM PORT ’B’ 


T13 
MOV eTEST13 RR aa ON ERROR ADDRESS 
mm 0. ITERATIONS 
TEST13: MOV asT ACK “THE STACK POINTER 


aan eemnpremanemmenedenmnmemesememmnminanenneammentieel 


64S: 


65S: 


;SEIZE THE DRIVE THROUGH PORT B 


HOV ae is + ys Bort’ *S ADDRESS 
P 





CLR 
MOVB 
MOV aconee T LOCATION FOR TYPEOUT 
MOV 1 RobRES 
nov ee “By PORT 8 
;RH 

; 7 ADDRESS 
ck 5 +s i s are BE Ze 
CHP He T,SBDDAT ; He REGI Ro” 
ERROR 4 oe 
MP : BYPASS RE T ener THE SUBTEST 


Nov” PORTE PTNBR cmove T pbpRe 5 TO LOCATION FOR TYPEQUT 
MOV RPDS {RO tea} ssaobat : F Zine poet CORRECT STATUS 
MOV Ha !ORY! 


;EXPECTED S ATL US 





MOV ang 1 ;uU MASK 

COM ; Nt T fuera TED STATUS 
MOV T $7 : 

BIC TMP 1, $TMPO ; 

cH $GDDAT, STMPO ;BRE T Meroe 1Tatus BITS SET ” 
ERROR S : EPORT THE E 

NOP 


Tati tteeeTTTTee 


tARTY 


E CLEAR THROUGH POR 


MOV #11,RPCS1(RO) ; ISSUE DRIVE CLEAR THROUGH PORT B 


$ eatey THAT DRIVE SILL, SEIZED BY CRT ee eessssSn”"”= 
VERIFY THAT DRIVE STILL SEIZED BY POR 


MOVB PORTA, RPCS2(RO) pSELEST PORT A 





MOV PORTA, PT ; MOV S To. OCATION FOR TYPEOUT 
CLR KERR’ ;CLEAR T CHECK E RROR' INDIC ATOR 

MOV ) Bec ONTER 

HOv rod REGIST RY 2S. ee Be ERROR MESSAGE 
CLR A 

MOV T, STMPO R eon T Aree TO ‘$TMFO’ 

BIC st rear | STMPO ;S Ea, pit tf 

CMP SGODAT , StMPO 2 

BEO 3 'BR 


66 
MOV SBODAT , STMPY BGey ‘BAD DATR* 


SEG 90071 


HO6 
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CZ2RJEB.P11 O4-NOV-77 13:27 713 TEST THAT 'CLEAR’ DOES NOT CAUSE RELEASE FROM PORT ‘B’ SEG 9072 
SES REE RIM BBiiE BIE STPAUrARIORY —SORP*LIVE BBSKEBAPA Pon rvreou 
3969 Bie? 4 001244 ~~ con CKERR ore T REGISTER COMPARE ERROR INDICATOR 
3871 0167 113 001226 000010 g MOVB  PORTB, RPCSE(RO) SEL cr PORT 8 
387¢ Hee ee Bis 001234 nov PORTE, P TNBR ; vELE BR ss ok ehRoR tnote FOR RTYPEOUT 
365¢ i i 5 18 Batis HOV pany ROARoR ro eect STER ENTS Or ReOsL 3¢ ERROR MESSAGE 
3659 ee He sea 1124 AoV see ‘opp! RY! Ww TER SHOULD BE 
3834 5} 818335 Bat ise pot ies MOV sears ; aut CONTE cfs 6 
38793 017046 Os 737 901164 BIC Ti STHPO ; 
3880 017054 7 11 1164 baat : 
3881 017062 001414 BEQ BR IF 
Bivore odeeae B79 BOlioN Bre CPovee simpy 6 ECLEAR. be a, 
017106 033737 001174 001124 BIS STMPY , $GODAT ‘FOR WL uM H GOOD EO ARA FOR TYPEOUT 
815198 dpe? 33 001244 EGR aZeRR :SET is S308 72, COMPARE ERROR INDICATOR 
017114 900240 68S: NOP 


« SHESAASSASSSASSSASSSARSSAASREKRERERSRRRKEKRAARKRSRHRASRALSAERASSSRE 
: HOW ISSUE MASSBUS INIT 


017116 012760 o00040 9000010 MOV @CLR,RPCS2(RO) ; ISSUE MASSBUS INIT 


; SSKASSSARSAKRAKAASSSAHAKAKAERSARSRAAKAHRRKKRARRKAHAAAARKKRHAAAAASLSLS 
: CONFIRM THAT ORIVE STILL SEIZED BY PORT 


SRR PERSRSESIIER 


017124 113760 001224 o00010 MOVB  PORTA,RPCS2(RO) 

3898 0171 737 901 24 001234 MOV PORTA’ PTNBR ; MOVE baGe hoe FOR TYPEOUT 

$9 01714 7 O012e44 CLR CKERR’ TOR 
3900 017144 016037 O00012 001126 MOV RPDS1 (RO) oe ‘e 
3901 017158 018732 1g 001122 MOV roe IST Sofie” be ERROR MESSAGE 
3902 0171 ll ADD RO ; RH11 
3903 017164 7 B01 128 CLR WHAT Gt T SE 
3904 017170 0011 001164 MOV T, STMPO : MOVE TER at Su TO *STMPO’ 
3905S 017176 042737 100000 001164 BIC 81C077777,$TMPO ; cirie ITS 

017204 3737 001124 001164 CMP =i ; HE 

390 17212 1414 BEQ ;8R IF 
3908 017214 013737 001126 001174 MOV SB0DAT, § ‘COPY ° DATA 
3909 017262 73? O77 727 901174 277 Sines iCLEQR T E g1T g 
Soi) 175% iota tet DOlles caoR Stave fess padliguaeands 
331¢ 017240 37 001244 wee COM ion :SET THE STER COMPARE ERROR INDICATOR 
3914 01580 ii 760 001 000010 Nove PoRTB, RPC 2 RO) -SELECT PORT 
3315 b17e54 73 00 eee 001234 MOV PORTE, PT sMOVE tT S ol ATION FOR TYPEOUT 
317 Bi7se6 O1e037 OOODI2 O01 Sov =—s RPDS ARO), $BDDAT’ —— 
2318 bi 7e74 018737 00018 $1158 nov aRPDS! 1320 book role eeitiE folic” 3¢ ERROR MESSAGE 
3923 017306 012737 011700 001124 MOY OP Teeer pempavicn SCDDAT ORE CisT ER SHOULD BE 
392i 017214 013727 001126 001164 MOY SBDDAT. STMPO : MOVE BOAT june CONTENTS TO *$TMEO° 


a 

as og 
at = 

NNN 


SER CaSRER 


Epa 
NNNNNN 


D.DDD 
BOVE 
222 
2 F220 
= &Bn 


se5Ri 


2 


saa SS SETES, 
o 


OOOOOOOOOOO0OCHOO 
St tet t tat teat Stats tet att tear tat pap at tapas apapatatatatatetotad 


28 


= 


es + | ae 
se 


men 
bah 
uo 

Nz 


Rhy 


ONWNSN 


NSNNNNNY 


JYotetatate 
RENTRos 


I06 


MACY 1 30( 1046) ot NOV-77 17:4 PAGE 73 
13:2 T13 TEST THAT CLEAR’ DOES NOT CAUSE RELEASE FROM PORT ‘8° SEG 0072 
100000 001164 BIC 81C77777,STMPO ;SAVE CIFIEO BITS 
001124 O01164 one SGODAT, StHPO iCOMPORE” THE BITS 
1126 901174 V T, STMPY :COPY ’ DATA’ 
001174 BIC 77'$TMP4 iCLEAR TH MASKED BITS 
1174 061124 BIS SIMPY, $cODAT ;°OR’ WITH GOOD DATA FOR TYPEOUT 
ERROR ; TYPE it SSAGE 34 
001244 = COM CKERR : SET GISTER COMPARE ERROR INDICATOR 
;RELEASE THE DRIVE FROM PORT B 
001226 000010 MOVB PORT » BPC B(RO) vi BORE bbe 8 
001226 001234 MOV PORT ADDRESS TO LOCATION FOR TYPEOUT 
000013 000000 MOV #13, Pecsirno)? SSUE RELEASE THROUGH PORT B 
;VERIFY THAT THE DRIVE a IN NEUTRAL 
001250 CLR RELERR ;CLEAR_THE "RELEASE ERROR ’ INDICATOR 
le 001122 HOV Py FORM THE a: OF RPDSi FOR TYPEOUT 
1 RO i T Par 
il 001124 MOV anide! ‘DPR! ORY! VV ISON CONSTANT 
oo1se4 40 MOVB PORTA, RPC (RO) : 
12 il Vv ed TMP2 ; TATUS REGISTER FROM PORT A. 
0011 1164 MOV ST § ; hor 
100100 1164 BIC BATA! VV. ST 3C ER NOENT BITS FROM THE COPY 
000010 MO PORTB Ree ( eae 
I 001172 MOV pros 1 to} TMP3 ; He TATUS REGISTER FROM PORT B. 
11 001166 MOV ST STMP1 :C ey I Rt 
390100 001166 BIC BATAIVV.STMP1 CLE ITS FROM THE COPY 
1164 001166 sin ,StMP1 I THE pn pee ete THE SAME FROM BOTH PORTS ? 
001164 Pat THPO > REG STE ARE THE SAME: ARE THEY ZERO ? 
ERROR 46 ; EPORT DR NOT IN, Me cnet OR NOT SEIZED 
7740 IMP 78s ? BYPAS 
1170 001126 74S: MOV STMP , SBDDAT :SET TELE Be THE STE oe ERROR MESSAGE 
00 1¢26 001234 MOV PORTE, PT ; 1 NG EST SHOWS DRIVE NOT IN NEUTRAL 
le26 000010 MOVB PORTB;RPCS2(RO) ;: L T Rt 
001164 TST ST : F oATUS: EQ 0 FROM PORT A. 
BEQ a ; I ne RO 
001224 001234 MOV PORTA, PTNBR ;SEIZING PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 
9014 2 OO01126 MOV $7 - i ;? TA’ FOR ERROR TYPE OUT 
1224 o000010 MOVB ORTA:RPCS2(RO) ; L CT PORT A. 
001166 rst $THP Bk : F STATUS EQ ZERO FROM PORT B. 
77777 001250 75S: MOV e- 1,REL RR : SET REL ASE ERROR* INDICATOR 
1} 000000 MOV *RPCS1(RO) CLEAR I 
000013 0600000 MOV si RPC 1(RD) : ELE HE OR VE 
ERROR ge :T OR 3 26 
001170 001126 76S: MOV mPe, AT LOOK FOR BIT FAILURES WHEN RPDS! READ 
001224 O01234 MOY PORTA, PTNBR ‘CHANGE POR NUMBER 
1000: 001170 BIC sATA, $TMPe :DON’T CHECK THE ATTN BIT 
001124 001170 CMP SGDOAT, STMP2 :ALL BITS OK ? 
:BR IF OK FROM PORT A. 
ERROR :REPORT ERROR 
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MACY11 30(1046) 
13:27 
001172 1 
001226 eget 
100000 001172 
001124 001172 
001274 
o2 
177777 001274 
900014 001102 
0016 901106 
020016 1110 
001176 
001100 


000014 
000010 
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713 Test THAT ‘CLEAR’ DOES NOT CAUSE RELEASE FROM PORT ‘B” 

77$: MOV ;CHECK RPDS1 FOR BIT FAILURES - FROM PORT 
MOV SORTS: EINER i CHANGE P PORT NUNBER 7 
BIC saa, pam DON’T CHECK THE ATTN BIT 
cn $cD0A ; SEE PF READ OK FROM PORT B. 
RROR 7 | ie ERROR 

78$: NOP 

1$: SCOPE ;LOOP ? 


REKRAKAARKAAKAKAAAASAAALAAARARKRASARAKRRARAKRAAAARERRARARRRAKERAKRASAES 
; RTEST i4 TEST RESET ATTENTION ’A’ BY MASSBUS CLEAR 


: EVERIFY rHet ad e are= INITIALIZE CLEARS ONLY THE ATTENTION BIT OF THE 
SEIZ 


is 
i A. SET EACH PORT ’S ATTENTION BIT. VERIFY THAT BOTH ATTENTION BITS 
4H t 
is B. SEIZE THE DRIVE THROUGH PORT ’A’ BY WRITING O'S INTO RPDS1. 
i* C. ISSUE A MASSBUS CLEAR. 
tH 
:# D. RE EASE THE DRIVE THROUGH PORT ’A’. VERIFY THAT THE ATTENTION 
i BI T A’ “HAS BEEN CLEARED AND THE ATTENTION BIT FOR PORT 
i# *B’ IS STILL SET 
ii ceneeenesaneneneneneaeananeneneseneanueeneneneananeneneneatatas 
TST KYBCTL ; PERFORMING ONLY SINGLE TESTS ” 
BPC ¢$ set ir J N D T 
IMP RE Un eh neXT TEST NUMBER 
1S MOV o18: C eyBCTL :SET SINGLE TES INDICATOR 
8 FRY? HEGHIE"Snape [1585 CHEB reer aooness 
MOV ae St PERE 3L On ERROR DRESS 
MOV -DO0 4 ITERA 
TEST 14: MOV a ‘(OAD THE Bae POINTER 


esti: HOV, EStRCK SE, CORD THe STACK BOINTER 
;SET ATTENTION BITS FOR BOTH PORTS 


MOVB PORTA RPC (RO) ECT canons” 64S 
MOV 1 RPER RI 
CLR REAL 
MOV TB Rees2cRO) ng RT tae CER PORT 

64S: TST RPOSItRO) TO TIMEOUT 
BEQ 64S MESN’ T IMED OUT 
MOV aol aRPERL (RO) :F FORCE ERA ON PORT 65S 
CLR A ee sf 08 RROR 
MOvVB BO i) CS2(RO) s SELECT “64g” AGAIN 

6S$: TST RPDS t :WAIT FOR DRIVE TO TIMEOUT 
BEG 65$ :BR IF DRIVE HASN’T TIMED OUT 


SEG 90074 


cee ERO OL CTRLR LGC. MACY11 30(1046) O4-NOV-77 ride pote 
Cc B.P1l O4-NOV-77 13:2 T14 TEST Re T ATTENTION ’A’ BY MASSBUS CLEAR SEQ 0075 

















JE 

34 Fy SNEIRM THAT BOTH ATTENTION BITS ARE GED NaaeaRRESES 

3 {AONFIRM THAT BOTH ATTENTION BITS ARE SE 

37 1 PORTA, pcse( ) T 
2 i ME egling ac Pe eras 

o s ee 
1 1 1 001126 MOV ) cere 

3 i ° 0011 nov REGis Ge Bt ERROR MESSAGE 
404 144 O1 001124 MOV os 
4044 158 1 2, 1164 nov ie ej NT NTS TO 'STMPO’ 
404S ' 

1 1124 001164 Cc : 

sone 186 1414 BEQ ; 
wove 76 137 00 001174 MOV : DATA’ 
404 7 i 001174 BIC ; oan RASKED BITS 
4080 os0s2 37 001174 001124 BIS $TMP4, SGDDAT ;? Reson Te Eamon A FOR TYPEQUT 
{ae rea 001244 ~ con CKERR T THE REGISTER COMPARE ERROR INDICATOR 
ioe8 is 001244 ; Tor CKERR ae QTTN BIT FOR PORT A SET ? 
4056 0 1g = IMP te er"Fonr-8 TEST IF NOT 
et ie eh mb Bek ehRGR Moiaran 
4060 1 1 901126 MOV RPOS1 

1 1 00 0011 MOV - ERROR MESSAGE 
q063 1 001124 MOV D BE 
4064 1 1 001164 MOV TENTS TO 'STMPO’ 
406S 16 001164 BIC 11s 
1068 37 001124 001164 CMP BITS 

oye BEQ 

oes sera TOMES OOLITS cee BERRA! SPE He Raley rr 
4070 ee 035737 11 85} 124 BIS sina, SGDDAT Ha 6000 BATA Por TYPEOUT 
1078 baci a7 001244 sok con CKERR :SET THE REGISTER COMPARE ERROR INDICATOR 
es fees Greg, coe Ce Lite» ams OTD BAT Fon Pont © ser 2 
407 020374 000139 021244 IMP is :BYPASS REST OF TEST IF NOT 
pire | 5 Hee a Ae ae aE aE ae AH a A EH aa EERE RE ER RRR EEE EEE EE 
4080 ;SEIZE THE DRIVE THROUGH PORT A 
4082 O20400 113 001 000010 MOVB PORTA,RPCS2(RO) ;SELECT PORT A 
4083 D204 013737 651554 001236 MOV PORTA, set PT 3 STORE F SEIZING PORT’S ADDRESS 
4084 020414 O05 000012 CLR it 
4085 0204 013737 001226 001240 MOV PORTS, OPPRT :* OPPOSITE’ PORT ADDRESS 
mee HA Wee aan Pe aoe 


LOGE 


CZRI Ot CTRLR LGC 1 30(1046) _O4-NOV-77 4 page 
ESRIEB P11 O4-NOV-77 13: Nee T14 TEST Rede, AT NT TON "A’ BY MASSBUS CLEAR Seo 0076 
O1e7 68 ooco4o0 9000010 MOV R,RPCS2(RO) ;MASSBUS INIT 
34 113760 O0lee4 000010 MOVB TA,RPCS2(RO) °;SELECT PORT A AGAIN 


peaseenproqnesssnzoonssoungosecesesoonsedess weanegnnennanenanses 
: VERIFY THAT ATTENTION BIT FOR PORT A C 


seers f 





as e. “RPDS INDICATOR 
MOV 3F ERROR MESSAGE 
a SAF *STMPO’ 
1237. CMP : 
nu af ‘et 
Bee sae Bie eatliScar Se be RESBSAL fon rvreou 
pstele 005137 001244 725: con CKERR pie eo ee COMPARE ERROR INDICATOR 


ss SEKKSKSRSSLEKKSSAAAESKASSESRARESSAKASRRSRERAHRKARASLAAALRAKLLLAES 
;RELEASE THE DRIVE FROM PORT A 
MOVB TA, RPC (RO) LECT PORT A 
MOV SORTA nove “Boat S TO LOCATION FOR TYPEOUT 
13 MOV #13, TRecst ROD: SSUE REL THROUGH PORT A 
;VERIFY THAT THE DRIVE IS IN NEUTRAL 
eae ’ INDICATOR 
RPOS1 FOR TYPEOUT 
ae RISCH CONSTANT 
a H ais Sees REGISTER FROM PORT A. 
2srreo® BITS FROM THE COPY 
ea) gh TATUS REGISTER FROM PORT 8. 
OPY I 


iste ITS FROM THE COPY 
AT POISTE THE SAME FROM BOTH PORTS ” 


ARE THE SAME: ARE THEY ZERO ” 


bet 
MW 
NN 
a 
Toro 
re 
rv 
we 
£0 






SPONOLLOOL 
3 
& 





SEfESSLSSSSSSELSLELSLESLESSELESESL LESS ESE ELE LSELSILLE 
ee ee ae ae be Be Be he ae Be Be Be be Be Bn ae ae ae be Pn ae Bsn Be ae se ee nw Be Pn De me ee ae ne sw Be ee 


FESSESSRRT PERE R IE NOORONN canine SSBIRREDRSS 
Bro 
x 
c 
8 


ERROR oa ot Ee Ur, - NOT SEIZED 
JMP 7 ares 
74S: MOV 3 MPe, AT T Bao ORTAF aa seRROR MESSAGE 
MOV TB, i TPO T SHOWS DRIVE NOT IN NEUTRAL 
MOVB PORT ;RPCSeCRO) } rang 
fat Ma BR F Sia Atus "EQ O FROM PORT A. 
MOV PORTA, PTNBR Ser? PING PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 


CZRJEBO, DL CTRLR LGC rely 30( 1046) O4-NOV-77 17:48 PAGE 77 
CZRIEB.P11 O4-NOV-77 T14 TEST RESET ATTENTION °A’ BY MASSBUS CLEAR SEG 9077 








41 137 Bi ize 901.126 nov ie $2087 see Pear QR ERROR TYPE OUT 
414 1 VB (RO) ; 
41 fe TST : ae EQ ZERO FROM PORT B. 
ie Bie ec ny Bits : rs poems 
41 1 i5 40V it ; 
41 1 ERROR : os 
se BI Ye Bue Ye i ne ee 
4 i 61170 BIC BATA fa af ; sate nee ATTN BIT 
ee . 
in ee eto 
41 1 Nea: 001:72 001126 77$: MOV Bere, i ange IT FAILURES - FROM PORT B. 
wigs 8518 Ri3534 3200868 881 ¢32 Bic a,$ nea Bont BL HEE BIT 
4163 021108 3737 1124 001172 cne SGDDAT, STHPS ; EF CREAD OK 
sige BBLile res: Rare” ripe on 
‘ : 
sit 3 s SESRESSSSSSSSSSSAAERESSKSKSSSSSSERHSSRREERRRERRERRERRRSRSEAASER 
188 ;CHECK ATTENTION BIT ON THE ITE PORT (PORT B) 
4171 O211 il 001226 000010 MOVB pF » BPC har novk Boa 
43 1 MOV PORT ES TO ATION FOR TYPEOUT 
ii3e HELIS Biscay ieee SOI BY” RRP sho FORT coors LOCA 
4175 tive 1 pot iss MOV ol RECiSTER g 55. OF ERROR MESSAGE 
ai8 ited 1 é il AoY s WHAT 
4178 1186 1 B5i ies HOV ; sh Gist : ONT NTS TO *STMPO’ 
ss . 
wigs felsee Soerae Gorton BBlles is nthe Tie of 
41 1 i 001174 v T, STMP4 ae DATA’ 
41 1 001174 BIC stmpy i$ E MASKED BITS 
4 BS i858 Teo 001174 001124 ae TMP4 , SGDDAT H_G00p DATA FOR TYPEOUT 
4 os 1548 i 001244 non CoM CKERR Tee T seaty 80, COMPARE ERROR INDICATOR 
41 1 1S: SCOPE ;LOOP ? 
wy 
sig8 H fret ic TEST RESET ATTENTION 'B’ BY MASSBUS CLEAR 
4132 ; ATE TEST RESET ATTENTION 'B’ BY MASSBUS CLEAR 
aes eels THAT A MAS SBUS INITIALIZE CLEARS ONLY THE ATTENTION BIT OF THE 
4194 i# SEIZING PORT. 
4136 :* AL Set EACH PORT’S ATTENTION BIT. VERIFY THAT BOTH ATTENTION BITS 
-4& . 
4198 :# 
ubo3 + B. SEIZE THE DRIVE THROUGH PORT 'B’ BY WRITING O’S INTO RPDS1. 
4201 :@ C. ISSUE & MASSBUS CLEAR. 


NO6 


OL ome GC 1 30(1046) _O4-NOV-77_ 17: 

ESRIEB Pa V-77 13: m3 T1S TEST Reser ATTENT LON "B’ BY MASSBUS CLEAR SEG 0078 
* 

* O. FoR. 1" VE wae Oren P RIFY_THAT THE ATTENTION 

: iT sri, eg Has N CLEARED ano’ § ATTENTION BIT FOR PORT 


FL 1 dala ahahahahahahahahahahahaiaiaiaiahehaiaiaiaiaiababalabatalelatetelehahaiaiaiaiaiaiaieiaiaiaiaieiaiaiaieiaiaiaiaiaie 
KYBCTL at ONLY SINGLE TESTS ” 


y4e Erne 


ii Te a T i TES ee eee 


ie AF lata 


et ed 


vesiis: 
StS BB ccnade EA avnen iD TE TE POETS sannne 


;SET ATTENTION BITS FOR BOTH PORTS 
































4 D2 1 MOVB PORTA, RPCS2(RO) ; 
wzed el Hoy lg 
4 De 1 MOV S2(RO) ; eee HER PORT 
ue wl 64S: TST ; VE 19 TIMEOUT 
De 1 Q BR MESH’ T mel 2 ouT 
4 02 | HOV e An 1(RO) 85 
4 D2 1 A520: RO) fe cT 
a5 1 6SS: TST itro) TF FoR ele fo “Fineou 
ue 1 BEQ 6 :BR IF’ BR AED OUT 
is inhale tikes x tetaelteneben Siteeds ic. 
‘  AONFIRM THAT BOTH ATTENTION BITS ARE SET 
4 1406 0 
4 1414 abeced TO LOCATION FOR TYPEOUT 
a Bi r cee Fapgs, norcere 
ees 
4 : ik Bt 158 : be ERROR MES 
4 aug il AOY . 
ee 
4 1454 BO 164 MOV TENTS TO *STMPO’ 
4 1 01164 I 
4 iy enent Pe ‘BR IF 
3 ae SA eee I Be 
te . 
‘ i is 001124 ih. $TMP4, $GODAT i SEES WITH GOob #4 Por TYPEOUT 
‘ 3 i — Con éRerR PS ae REGFSTER COMPARE ERROR INDICATOR 
4 1 y TST CKERR ;WAS ATTN BIT FOR PORT B SET ” 
“ 1 BEQ +6 :BR IF IT WAS 
4257 021540 IMP is ‘BYPASS REST OF TEST IF NOT 





BO7 


sia eile OT Nie 77 13:2 3523! i rie — test! rece ATTENTION 'B’ BY MASSBUS CLEAR 


68S: 


1544 0 
fey St 
1564 DO11 

i B01 18 
1 D011 

1 001164 
1 BO1164 
i 001164 
1 001174 
1 001174 
1 D01124 
1 

1 

1 

1 

1 

1 






Se a S83 


issue 










nove Bera PTren TION FOR TYPEOUT 
cLR : eer at NOICATOR 
Vv RPOS 1, SBOR " ERROR MESSAGE 
Vv are 
y 3008 TENTS TO 'STMPO’ 
ee 7 
9 $8006 ; 
é - THP4, $cD0AT i a: FAT Zor TYPEOUT 
E6n ARERR ; fe "Recto? R COMPARE ERROR INDICATOR 
i CKERR ;WAS_ ATTN N BIT FOR PORT A SET ? 
+ 
is : BR pass! R REST OF TEST IF NOT 


ss RSSSSSSSSSSSSLAKSLSSESASSLSLSRASSRERRASRARARRE RRA ARRRRR ARR E EEE 


;SEIZE THE DRIVE THROUGH PORT B 


HOY eat ge st a NG & Port's ADDRESS 
nov port ADDRESS 


g, Ab Ae ab A ab a ab bab a a a a a aa aa aa a aaa aaa aaa aaa 
MASSBUS INIT TO PORT B 


Hove © PORTA RECSECRO) “SELECT PORT B AGAIN 


UERIFY THAT ATTENTION BIT FOR PORT B CLEARED NN ReHAH EEE 


VERIFY THAT ATTENTION BIT FOR PORT B CL 


MNN TOO 
£££ £££ 


72S: 













CLR KERR ae tes ie. * CHECK ~AeDS INDICATOR 
MOV iF (Ri BODAT TENT 

MOV iF REG STER dF ERROR MESSAGE 
APR RH 

CL T Fe 

M NTS TO 'STMPO’ 


IF 
;COPY ° 


Elio STMP4, SGDOAT OR Phen Por TYPEOUT 


OM CKERR ‘ure T TER COMPARE ERROR INOICATOR 


Pits) 
pee 
333 





fp PASAAAALSSLSAAALALEAKLLAALASLAAASRALLESHRAALSARARAASRASRKSRHKRARARE 


SEG 9079 


CO? 


CZRJEBO, DL CTRLR LGC MACY11 30(1046) _O4-NOV-77_ 17:48 PAGE 80 

CZRJEB.P11 O4-NOV-77 13:27 T1S TEST RESET ATTENTION ’B’ BY MASSBUS CLEAR SEG 0080 
4314 
315 ;RELEASE THE ORIVE FROM PORT B 


6 
ig AS ALES GREE SERRA = RP PREFERS oud Bobb teobaseedan gor rere 


;VERIFY THAT THE DRIVE IS IN NEUTRAL 


CLR ¢ AR _THE ' ces . Pe CATOR 
001122 800 YPEOUT 
{ 001124 Vv VV ONS TANT 


i 651178 nove oe He ve: TATUS REGISTER FROM PORT A. 
1 1 1164 MOV Oo’ 

1 

1 

1 







— 





35 





rege Cen SER RO NON IN” 


wre 


1 
i 
1 ol BIC TA T - NOENT BITS FROM THE COPY 
1 1 vB T (RO) Fer 
1 11 v (BO) T oi STATUS REGISTER FROM PORT B. 
1 1 11 v ST ste 
19 1 11 Cc SATAIUV, STMPI ROENT BITS FROM THE COP’ 
1164 1166 giro ,StMP1 TAT STER THE SAME FROM BOTH PORTS ” 
S 001164 S TMPO G a ARE THE SAME: ARE THEY ZERO ” 
Err 
MP 


wer oe NOT SEIZED 
me My Seo Bers FOE conon wessace 
T SHOWS DRIVE NOT IN NEUTRAL 
Fane EQ 0 FROM PORT A. 


F TEST Ps ae NOT IN NEUTRAL 
PORT Qf ERROR TYPE 0 


tat EQ ZERO FROM PORT B. 
Bin ERROR’ INDICATOR 


Ow 


Bee 
ere 
. 

3 


ar 


% Sr PM SLG 


3 3 


Se 
wee | 


BB 


URES WHEN RPOS1 READ 


77777 
i3 
i 1420 Ot 4 76S: 
She BI 


a ae ES 
CRON AITSASVABSIRA 
ce cs Bee a 


SEESSSSSSSESSLELSSESSLLS SELES S ELSES ESSE ELE SCLELSCELSELLESELLLLE 


2 fe saree BIT 
$4008 ,STMP2 
eT af ROM PORT A. 
1 1 001 778: v THR, e } T FAILURES - FROM PORT B. 
, ale ¢ TA STMP ; IF? ‘ Rae Rs BIT 
Lt e 
364 37 0011 Boti7s np $copAT, SThP3 OK FROM PORT B. 
36 144 Q 
10400 RROR 7 par F ERROR 
367 240 79S: 
3&9 5p PRS R REESE PPLE AA SSAA LESASLAAASE LALA PALA RARER RAS RHEE ETS 


DO? 













C2RJEBO, DL CTRLR LGC MACY11 30(1046) O4Y-NOV-77 17:48 PAGE 61 
C2RIEB.P11 O4-NOV-77 13:27 Tis TEST RESET ATTENTION ’B’ BY MASSBUS CLEAR SEQ 0081 
4370 ;CHECK ATTENTION BIT ON THE OPPOSITE PORT (PORT A) 
437 1 1 0 MOVB (AO), TA 
4 3§ 7 ay B89 o4g nov RES oh? ehQsal 10M FoR Ty TYPEOUT 
4 ck NDICA 
4375 1 901126 v OF RPOSI 
4378 1122 B80 ERROR MESSAGE 
4 1 D011 Vv 
4 1 301164 nov TENTS TO ’STMPO’ 
4 001164 8 as 
4 1124 001164 cn ; 
4 414 fe ; 
: sere POLARS BLITS ae ho ‘7 
 ) e 
“ 7 il N01124 Bt TMP4 , $GDDAT :7 ED I Zor TYPEOUT 
4387 boc Eon’ ek PE SSOGt 
4 001244 OM KERR i Tyre T R COMPARE ERROR INDICATOR 
4388 poce40 79S: NOP 
4389 000004 18: SCOPE ;LOOP ? 
4 
me 
43 g ptHEESESHREEREESER SEAN EDOM OO TEATION BY MmeeOUS INIT ~ DRIVE IN N 
4338 ; ATES TEST CLEAR ATTENTION BY MASSBUS INIT - DRIVE IN NEUTRAL 
4396 : SVERIFY THAT MAS AR DOES NOT RESET ATTENTION BITS WHEN THE 
4332 i DRIVE IS PRUNE GHRAL. 
4393 # A. SET THE ATTENTION BITS FOR BOTH PORTS. 
4401 i B. VERIFY THAT THE DRIVE IS IN NEUTRAL. 
a4p3 7% 6. ISSUE A MASSBUS INIT. VERIFY THAT NEITHER ATTENTION BIT HAS 
-& 
= mig ge 
44 7 001274 TST KYBCTL MING ONLY SINGLE TESTS ” 
“oe G8656 p0s737 BO SINGLE TESTS 
4410 25 a eS ie: SLE D Test 
wad on2602 XEC Te NUMBER 
441 12737 001274 4$: MOV i a “fe XTNO CATOR 
4413 Oe 7 1 37 001102 2s: MOVB a1 S131 AF if 
ie ait ney a | Oh Tason RooRes 
4415 Ge 12737 D011} MOV oy i Hs OR Ss 
4416 2614 012737 001176 MOV i 
441 Deseb2 012706 001100 res? 16: MOV eat eat OS tn 
wis EST1G: ROV gg BStACKs SP awennal oeoaltea dl eoee sere saeatensnes 
w20 ;SET ATTENTION BITS FOR BOTH PORTS 
44 2626 1137 000010 MOVB PORTA, R RCs (RO) T 64S 
ee 2634 $13788 001863 000014 MOV IEOREE ERR RRORS 
4424 022642 GOS060 000014 CLR fetal RO 
4425 ODece4e 013760 O0l22e6 000010 MOV TB, ‘RPCS2(RO) iehEAR F re ERR OER PORT 


CZRJ DL CTRLR LGC l 
EBD ONoNOv=77 mecas 


380 000012 
1 


CZRJE 





30( 1046) 


000014 
000010 


2s = 
To als 


5 
5 
ee eee 


5S 


Ne Zo 


O° =e 


Ped i od ol 
NN @ooorw 
ff £££ 


te NOV-77 17:4 page 
T16 TEST ci eAR aT NF FON BY MASSBUS INIT - DRIVE IN NEUTRAL 


64S: 


65S: 


ON PORT 


Be, ier bl Fa ed ouT 
a a 


« SRERKKESSASSSSSSSRSRSRSSSRSRSSRSREREAERARERSRRERRRRSERSRSHARREE 
 AONFIRM THAT BOTH ATTENTION BITS ARE SET 


66S: 


68S: 


JMP 


PORTA: Brn ee Fa: epoRess & ! Bae’ "tho FOR TYPEOUT 


“nt ) : oe 
TF 7 GONTENT R Bt ERROR MESSAGE 
WHA gs 
; WHAT . 
‘ . tue ar NTS TO *STMPO 
ts : 3 














8 stmpy > CLEAR 
$TMP4, SGDOAT :? oT Ep air Por TYPEOUT 
CKERR T THE REGISTER COMPARE ERROR INDICATOR 
yes ATTN BAS FOR PORT A SET ” 
F IT 
" TOF TEST IF NOT 
SS _TO_LOCATION FOR TYPEOUT 
CK E INDICATOR 
T CONTE NT 
REGISTER OF ERROR MESSAGE 
RH h Ss 
157 R TENTS TO ‘STMPO’ 
Tis 
: F 
;COPY DATA 
: ;, oR WITH EO AFA Por TYPEOUT 
CKERR is , Oe THEcHSTER COMPARE ERROR INDICATOR 
CKERR WAS, OTH BIT FOR PORT B SET ” 
is :BYPASS REST OF TEST IF NOT 


5 RAAT E EERE REE RAE ERR R EEE EEE EE 
; VERIFY THAT THE ORIVE IS IN NEUTRAL 


SEG 0082 


CZRJEBO 
eSRIEB Se 


th 


Seana 


SAASSSISS 
ONOW CWO 


Re 


ReRe 


roforurae 
RR 


FO7 
eC TBUR bce GCSS! SOCLONG) LOB-NOV~ TT ST CcERR ATTENTION BY 
CLR RR 
Os3219 001122 MOV 
1 ADD 
24 v 


Ren RGNe RULE SE ASSERTION 


conan 


i 
2 


nD 
aR 
8 


023536 
0e3S44 


i: " 
rt i 
1 
i : 


1164 
001164 


0012 
13737 Oolize 
1 D0 1lee4 
7 001166 
12739 
12760 
27 


001224 
001l2e4 


peo 
ee pe 


COON ON NI— 
FOOMosclcoo 





000010 


70S: 


718: 


723: 


733: 


74S: 





2s 
tL REYE Tn, 
813,RPCS1(RO) 
Seni aie 
2 , 

ane. PRBR” 
$60 +, STMP3 
24s 


RELERR 
. +6 


MASSBUS INIT - DRIVE IN NEUTRAL 





ERR re 3 
THE 
T 4 


EcT T B. 
Y 


The Geive, 


F 


T 
AT 


TA’ F 


OK 


ca 


E T A. 
+ fhe Ty + $TReO REGISTER FROM PORT A. 


NOICATO 


TYPEOUT 


NDOENT BITS FROM THE COPY 
TATUS REGISTER FROM PORT B. 


TMP 1 


Fest 


OM 


Sino OST RCETSTER TS 


ARE THE SAME: ARE THEY ZERO ? 


COPY 
M BOTH PORTS ” 


a Lxs 
DATA FOR ERROR MESSAGE 


SHOWS DRIVE NO 


"zens “EQ O FROM PORT A. 
ING PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 


TYPE OUT 


I 
Le T A. 

; F ali EQ ZERO FROM PORT B. 
E oF ERROR’ INDICATOR 


4 FOR BIT FAILURES - FROM PORT 8B. 


S WHEN RPDS! RE 


PORT B. 


;WAS DRIVE IN NEUTRAL ? 
;BR IF IT WA 


i$ TES 
WPITTiTiiiitiiiiiiiiitittiititiiiiiitiii 


' iSSuE 
MOV 


THE MASSBUS INIT 


@CLR,RPCS2(RO) 


; ISSUE A MASSBUS 


INIT 


5 , SHRASSSAAASRSRERSLKE RELA LAA LE LLEKEKL ELAR LESSER AALRARARALRALE 
:CHECK THE ATTENTION BITS OF BOTH PORTS 


MOVB 
MOV 


PORTA, RPCS2( RO) 
PORTA, PTNBR 


; SELECT POR 


T IN NEUTRAL 


4 of Une OR NOT SEIZED 
{ 


TA 
;MOVE PORT ADDRESS TO LOCATION FOR TYPEOUT 


SEG O0E3 


GO? 

















C2RIEBO, DL CTRLR LGC  MACYI1 3011046) O4-NOV-77_ 17:48 4 
EZRIEB. P11 O4-NOV-77 13:27 Tl TEST CLEAR ATTENTION BY MASSBUS INIT - ORIVE IN NEUTRAL SEQ o0e4 

a8 Bie mises SBE BET cmap spoon SLEPT Lee RHESeFRpE, TOrCATOR 
ai 4 001122 nov 3F RE STER RopRESS OF ERROR MESSAGE 
4 42 001124 MOV ; WHA D oF. 
se B01 164 Hoy : R ONT NTS TO ’STMPO’ 

45 001164 en ‘ , alts 
seus 3258 001174 Bee T, STMP4 TA’ 
4548 3636 001174 BIC BATA, StTMPY 7CL ED gits 
4549 ee 061124 BIS oR ashore i TOR” Wd TH TA FOR TYPEOUT 
mad 36 oa con KERR :SET T Reis ER COMPARE ERROR INDICATOR 
4553 000010 : MOVB PORT » BPCSB(RO) : cr T 
4554 36 001234 MOV PORTB,PT ; SS TO LOCATION FOR TYPEOUT 
weet r St SEEM non som CHE Tancetece fees, oieno 
i337 Oe3r1 pot iss HOV ar ; RE STER < ERROR MESSAGE 
4559 37 1124 MOV ; i D 
et Be Hes a Are EoceHazb eyes ens T° “S7¥FO 
web¢ 001164 cn $6008 ; rhe af S 
es Bares e874 a Seton Gee Radke er 
368 be37 001124 8 Ne one W eee BFA Por TYPEOUT 
4568 Ge4000 - con KERR :SET T GIs ER COMPARE ERROR INDICATOR 
4 70 024006 1S: SCOPE ;LOOP ? 
4572 
4573 z% SHRSKLSERESERASESREREERARESRAAL SEEKS SAAS SAELSLALRLSARARLARAAAAAAR 
1578 ; ATEST 17 TEST SEIZE BY RPCS1 READ THROUGH PORT ’A’ 
4578 j #VERIFY THAT READING THE CONTROL REGISTER (RPCS1) SEIZES THE DRIVE. 
4278 i# A. READ ont CONT BOY REGISTER (RPCS1) THROUGH PORT 'A’; VERIFY THAT 
Set i$ B. ISSUE A RELEASE T PORT ‘A’; VERIFY THAT THE DRIVE 

;* " *A’: V 

wee i # BSSuE WED TO NEUT THA OOO T THER ATTENTION BIT IS SET. 
eee 1 Te -tueaepen acaeantae.eennmnmamabapennneneann ts 
4586 18 905737 001274 7 1st KyBCTL ; PERF ING ONLY SINGLE TESTS ” 
4588 16 1 BPL I ; a JUST ENT DT ST 
4589 000137 00262 IMP EXEC :RETURN 8 GE nex T 5 NUMBER 

30 0127 901274 4$: MOV #-3,KY CTL :SET SI TEST INDICATOR 
W2qs BSubas ALS7a7 foabes Boling MOB Se Moon LOAD (OOP ON TEST ADDRESS 
4593 Oe404—E 012727 Oex06e 901110 MOY #TEST17,$LPERR ;:LOAD LOOP ON ERROR ADDRESS 


HO? 


CZRJEBO, DL CTRLR LGC MACY1i 3011046) “F -NOV-77 17:48 PAGE 8S 

CZRJEB.P11 O4-NOV-77 13:27 TEST SEIZE BY RPCS1 READ THROUGH PORT ‘A’ SEG coEes 
4594 O240S4 012737 007640 001176 MOV #4000.,STIMES ;;00 4000. ITERATIONS 
4595 Oe4062 012706 001100 TEST17: MOV #STACK, SP :LOAD THE STACK POINTER 


ae ;CLEAR ATTENTION BITS FOR BOTH PORTS 
4 


Sex? RRBITARSTSE™ SEDGE PMD 
MOV HER REST (ROD Ret Pack hte SRIVE 
MOVB S2(RO) ; #8 
CLR wt fied rhe "ORE Fn THROUGH PORT ‘B’ 
V #il, 1(RO) DR 
MOV $13;RPCS1(RO) ;RELEASE THE ORIVE 
Se eet tt dk hdd baedakahalehahahahaiaieieiaisielabaeiel 





SRReSieaaes 


FF 
Be 


4610 ;SEIZE THE DRIVE THROUGH PORT A 
Sis IS we GB MRT NIE Bee's scores 
Sk 2 ee oe ee 
uel pSy208 Ota : 1f3e NOV saooaT’ i F OR IZED By PORT A 
3615 osiete 215037 {18 001122 nov oR _ Rail] os she TER ADDRESS 
431 Geuse9 05039 S01124 CLR GENE RAT SHOULD BE. ZERO 
woes raed 37 001124 001126 HP SGDDAT , SBDDAT g The Re — ZERO 
Heed i OR ‘s port t T 
4625 OSE 000137 024674 seni IMP :BYPASS REST eer OF ME SUBTEST 
wee? 413760 001224 000010 ; MOVB = PORTA, Prren G0 veSBORF abo 

024254 013737 001224 001234 MOV PORTA, PTNBR fas 2 10 LOCATION FOR TYPEOUT 
430 0548 ples. BTi700 | BOL ies HOV {ARO} sS00B8 4 A ~sEXPECTED as 
eae e404 008137 001 1é6 pessinens COM Sire — ne 1 Expec TED STATUS 
ara 10 013737 001126 001164 MOV BODAT $TMPO ACT stat us 
4634 316 043737 OO1i66 001164 BIC SIMPL STH O int 0 Bi ie ; 
“eo 324 23737 001124 001164 CMP Gp +, STMPO wine EXPECTE STATUS BITS SET 

332 1401 BEQ 6s € 

4637 De4334 104005 heats ERROR S REPORT THE ERROR 
a 5p PAPA EAAA SESS SALAS AA SAL AA ASSLELSLLALAALEAAA REAR ASA L AAAS LES ES 
e2 ;RELEASE THE DRIVE FROM PORT A 
deve Goinse g1278? ORIEN ponase Rove PORTA. BPE Ok BEET obpersS 1g LocaTygu FoR TyPEOUt 
we46 BSa3es 012760 ee 13 iiatetaets MOV #13, TRECST TROD SSUE RELEASE THROUGH por? & 
4642 : VERIFY THAT THE DRIVE 18 IN NEUTRAL 


I07 


CZRIEBO, DL CTRLR LGC__ MACY11 3011046) _04-NOV-77 
ESRIEB-PLl”  OM-NOV<77 I3s2? Ti? TEST TS = ee READ THROUGH PORT ‘A’ SEG O0E 
4650 x CLR Soa THE 'RELEASE ERROR ’ INDICATOR 
V H THE 
46 







1 FOR TYPEOUT 


: T y; 
‘DPR! ORY! vv ae ; OMPARTSON CONSTANT 
MOVB ¢ ); GE Tne 
nov tro) Fr) Sey TATUS REGISTER FROM PORT A. 


001122 





a 
pists 


Peay Ty: 
Wis 
r 
20--g00-0 
N 
a 
8 


1 1164 ST § ; 
64 BIC BATA! VV. ST ; BERT BITS FROM THE COPY 
19 MOVB TB Reese. ) ; te? 
4659 4 ll MOV 4tRO) TMP3 ig He ad. TATUS REGISTER FROM PORT B. 
1 1166 MOV ST STMP 1 C 
466 1166 BIC BATA! VV, STMPL iC Fattolt ROENT gITs FROM THE COPY 
1164 1166 CMP STHPO, StHP : Hy THE” STAT GISTER THE SAME F BOTH PORTS ? 
001164 eos STMPO fe G TERS ARE THE SAME: ARE THEY ZERO ” 
4665 1045 BNE : 
MP 


See UTRAL OR NOT SEIZED 
CHECKS 

66S: ee Me FOR ERROR MESSAGE 
gine T SHOWS DRIVE NOT IN NEUTRAL 


sete 
on 
es 
S283 
ee 


: 
708 
sha 
TB; RPCS2(RO) ; 
$T : 





° 

1 ; 

i on 
467 001 : “EQ O FROM PORT A. 
467 is 4 BEQ 67s ; 
467: 1 37 1224 001234 MOV TA, PTNBR ;SEI PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 
4674 1 1172 MOV $THP 3, $8008 3? ome: FOR ERROR TYPE OUT 
4675 1224 I MOVB TA; (RO) ; 
4676 7 001166 TST STMP1 ce F STATUS EQ ZERO FROM PORT B. 
4678 13739 177777 001250 67S: By " Rete i ERROR’ INDICATOR 
4E 01 000011 000000 MOV #11 Re¢ »RPCSI(ROD = 5 C acer, 
see! 5 —— ERROR i or Re 

1 001170 1 68s: MOV T iN FOR BIT PR CORES WHEN RPDS1 READ 
ies AEGIS Glee BRUT poles oes A rapes ES dca ie 
4684 3737 001124 001170 CMP sapoRt, STMP2 ; L Bits OK 
4ESS . 401 Q TF OK apron PORT A. 
wee? 013737 001172 001126 69S: MOV TMP3, BODAT CHE CK 1REDS| FOR BIT FAILURES - FROM PORT B. 
4628 013737 001226 001234 MOV PORTE, :C 
4689 0237 37 001124 O01172 cH + STHP3 ; SEE READ OK FROM PORT B. 
4691 104007 ERROR a. REPORT ERROR 
4692 Oe46 000240 70S: NOP 
4633 024674 O00004 1$: SCOPE ;LOOP ? 
4695S 4 ifest oo TEST SEIZE BY RPCS1 READ THROUGH PORT “Be 
4e36 ATES TEST SEIZE BY RPCS1 READ THROUGH PORT 'B’ 
4638 {VERIFY THAT READING THE CONTROL REGISTER (RPCS1) SEIZES THE DRIVE. 
4700 Ss A. READ THE CONTROL REGISTER (RPCS1) THROUGH PORT 'B’; VERIFY THAT 
4701 i THE DRIVE IS SEIZED. 
4703 :# 8B. ISSUE A RELEASE COMMAND THROUGH PORT ’B’; VERIFY THAT THE DRIVE 
pie : RETURNED TO NEUTRAL AND THAT NEITHER ATTENTION BIT IS SET 
= s@ 


JO? 


CZRJEBO, OL CTRLR LGC. MACY11 30(1046) O4-NOV-77 17:48 PAGE 87 
CZRIEB. P11 O4-NOV-77 13:27 T20 TEST SEIZE BY RPCS1 READ THROUGH PORT ‘8’ SEQ 0087 

47 024676 ae 

4708 9057 7 001274 } r t KYBCTL ; ORMING ONLY SINGLE TESTS ” 

soit JMP bxec ; ‘4 i st ae ES? NUMBER 

4718 71 1 9539s 001274 1$: MOV $20, c. TL ; Ree INDICATOR 

471 7 127 001102 2s: MOVB eter if 

4714 7 127 001106 MOV 1 ae T ADDRESS 

4715 ? 1g? 7 0011 10 MOV fF ADDRESS 

4718 4742 012737 76 001176 MOV EAT ONS 

a2i2 024750 012706 001100 TEST20: MOV fick POINTER 

4719 ; CLEAR arwaten BITS ron BOTH PORTS 


MOVB ponree RPCS2(RO) ;SELECT 


+ ne — 
Ete lige = ih Tie 
013 00000 











Cc 

4726 19 005 te CLR a Ms agtRouct PORT *B” 

02eS0 sage 
472g O2S0ee B15525 Sbo013 ov 313° Niet? REL ME BRIVE 
wat 5p RARSRRAREES SSAA ERESRAASSEAAAKESSAAAEERRRAEELERAARALAAAA ALAS RARE 
473¢ ;SEIZE THE DRIVE THROUGH PORT B 
4734 025030 1137 001226 000010 MOVB PORT » BPC (RO) ;SELECT 
4735 025036 bi 3999 le 001236 MOV st ae & Bort’ *S ADORESS 
pi pSepeq Ty 37e5 1 10 mov 
4738 assbes else 1364 Bo1g34 nov ont eeene8 179 LOCATION FOR TYPEOUT 
pla 105 i 1 38 ees AOV 2" tol “By amas. 
4742 pSet re 001122 ADD pee ADDRESS 
4743 112 B01 188 CLR REG TER 
4744 11 0011 001126 CMP 
aoue is? rt ERROR Beh 
1747 isis 480 093 o2ss62 at IMP 1S ;BYPASS RE ‘. OF he ee SUBTEST 
4749 1 1 001226 000010 i MOVB PORTB, RPCS2(RO) 
4 14, i eee 001234 MOV PORTB| PT nove: wie ob2 ATION FOR TYPEOUT 
4751 1 1 le 001126 MOV RPOS1{RO) ASBOORT Ug ey I ited SEES CORRECT STATUS 
4 1 1 011700 001124 MOV 'PGM! OPR! ORY! VV Epes STATUS 
47 164 001124 OO1166 MOV T, STMPL WER 
4754 1 se 1 B01 166 COM TMP 1 pee STATUS 
4755 1 13737 0011 001164 MOV DAT, STMPO el 
4756 3737 001166 001164 BIC Hig $TMPO te ats: 0 BI Le 
mia cl 46 3737 001124 001164 cnP GDDAT, $TMPO aR rie B EXPECTE STATUS BITS SET ? 
47539 OeSe22 104 RROR } «ea He RROR 
4760 O25224 booese éS$: EP s° 2 


KO? 


cZRI DL CTRLR LGC MACY1I 30(1046) -NOV-77 17 
ESRIEBS Pil O4-NOV-77 13:2 130 TEST cet BY Apel READ THROUGH PORT ’B’ SEG c0ee 
47 ss SHEKRAAESASSKEKSKERESESSRESSRAKRESRERSRSRRRREHRAAERERASRSARREREAEES 
woes 33 
4764 ;RELEASE THE DRIVE FROM PORT B 


MOVB (RO) T 
RB SESTNoeattaay vGecie EERE Rea "PET 


; VERIFY THAT THE DRIVE ts IN NEUTRAL 
RTE AOORESS OF a ERROR ’ INOICATOR 


i Pee ee 15 oan 


nt IVE STATUS REGISTER FROM PORT A. 


$$595949555 
NER ERAS. 
if st tt 
Sees 
N 
ee bee 
—-OnrR— 





Fon 

; 

iw 

RB 

* Hoey TF 
1778 ‘ H r iesintees BITS FROM THE COPY 
4781 : O04 ; ce aM Trt? REGISTER FROM PORT B. 
4783 001 ITS FROM THE COPY 
47e4 boli ; Peete THE SAME FROM BOTH PORTS 7 
7 14 001164 . olen ARE THE SAME: ARE THEY ZERO ? 
3789 1 > REPORT NOT Phe cnet Se NOT SEIZED 
47 1 cat ll 66S: : t ar I E Bao TA FOR ERROR MESSAGE 
4731 1 63155 to ;SEI NG EST SHOWS ORIVE NOT IN NEUTRAL 
4733 ite 8 ; ATUS EO O FROM PORT A. 
q7ee : MOV ; I PORT F opRIve NOT IN NEUTRAL 
738 Baits Sorte : Bn DaTAY FOR ERROR TPE ob 

te oo 
4798 Boi Tee : ET F ngyrrus EQ ZERO FROM PORT 8. 
4e00 77777 1 67S: a0 ; - RR >SET ’ ERROR’ INDICATOR 
= PS Me MT Sa gg 
480. ERROR . :T MESSAGE 26 
4804 901170 001126 68S: nov Stnee, senor ; LOOK FOR 611 FAILURES WHEN RPDS! READ 
4806 BOL ied 061170 CMP SapoAt, STHP2 rere Bits u - 
BEQ : :BR IF OK FROM PORT A 
4808 ERROR + REPORT ABREOR 
001172 0011 69S: MOV STMP3, AT i CHECK 1 FOR BIT FAILURES - FROM PORT 8. 

ue70 0012 001234 MOV ORT SPR BR 7 NUMBER 
agi 001124 001172 cre ScD0At, STHPS ;SEE IF READ OK FROM PORT B. 
481 ERROR 7 tREPORT ERROR 
HELY 70$: OP 
4615 18: SCOPE ;LOOP ? 
46lce 
4817 


LO? 





DL CTRLR LGC MACYII 30¢ ) -NOV-77 17:4 
ESRIEB Pi O4-NOV-77 roe _— Tel test! poet Rests?” FROM PORT 'A’ SEG 9089 
18 itest o1 TEST PORT REQUEST’ FROM PORT Ae 
1 ;ATEST TEST ’PORT REQUEST’ FROM PORT 
aBes :AVERIFY 7 THAT WRI TER SETS ’PORT REQUEST’ WHEN THE 
igee ie DRIVE IS oe SEB Y T Tyee SPER Boat 
uses i# A. SEIZE THE DRIVE THROUGH PORT ’B’ BY WRITING 0’S INTO RPDS. 
4 ° i ’ O°. 
see? is 8 ia S ENTO REDS! FROM PORT 'A’; VERIFY THAT THE DRIVE IS STILL 
4 7% 6C. RELE COMMAND FROM VERIFY THAT THE ORIVE 
5850 ta su Tove on $5 PORT ra’. RIFY har sine AVTENT ON BIT IS SET FOR 
2833 i 1d AND IS NOT SET FOR POR 
48 :# OD. ISSUE A RELEASE COMMAND THROUGH PORT 'A’ AND VERIFY THAT THE DRIVE 
4834 # RET D TO NEUTRAL AND THAT NEITHER ATTENTION BIT IS SET. 
] H RRHKEREFERERSHA PRE ELE THAD EHS OER RELI KSEEHES HERA EREDEHEHERRE GE SOD 
483 S64 +éT21: 
S39 $737 001274 TST apts ea MING ONLY SINGLE TESTS ” 
I ; JUST ENTE D. TEST 
et Be i Ek PEL ape 
Se5600 1 901274 1g: MOV 8-1, KYBCTL TES XTND CATOR 
4 il 1 1102 : MOVB 82 $1 NM 
4844 025614 0127 901106 MOV ® gl, Be ON He T Ss 
Oeste 1 901110 MOV aTeSTel Pe jL Ss 
1 001176 MOV .,$ Ss ERROR 
4847 025636 012706 1100 TEST21: MOV BSTACK; SP stack POINTER 
weug ;CLEAR ATTENTION BITS ion BOTH PORTS 
4881 42 13760 go12e4 nov PORTA, RPCS2(RO) ; eae se 
54 O1 i MOV ail. aecs 1¢ ; Ry CLEAR 
15> EE HOVE 13, tro) : 
Dose 76 : ie CLR ate ; Ue aengtly Fan THROUGH PORT ‘B’ 
852395 61555 i3 MOV 313° : 





aE ae ae a aE ae aa ae ae a ae aaa aaa aa aaa a aaa aaa aa aaa aE 
;SEIZE THE DRIVE THROUGH PORT B 


4 1 es HOV” PORTE, aie “SEIZING NS Bort: *S ADDRESS 
3 nov BTA ite I" ? “Port ADDRESS 
SA 800618 MOVB PORTA, CS2(RO) TBF be 


SRReRIR 


1 
4 1137, 1 
1869 02E752 513389 0012 1234 MOV PORTA; PTNBR Dd + aDORESS TO LOCATION FOR TYPEOUT 
4671 + SKESASASSEAAASKSAAARAAAAAAALAKRALRAALAERAAAKRSAKAKKAARAARAARRARAAARARRARLEE 
4872 ‘SET PORT REQUEST 


MO? 


CZRJEBO, OL CTRLR LGC  MACY11 3011046) 04-NOV-77 48 PAGE 90 
we Bil” QN-NOV-77 13:27 T21 Test’ “PORT REQUEST’ FROM PORT ‘A’ SEQ 0090 
025760 005060 00012 CLR RPOS1 (RO) ;SET PORT REQUEST FOR PORT A 


4 TEASE THROUGH PORT B ORIVE SHOULD GuiicH 10 PORT A 
tRELE THROUGH PORT 8. ORIVE SHOULD SWITCH TO PORT A. 


gaaccs 
Bato a2 


;RELEASE THE DRIVE FROM PORT B 
PORTB, ores AOD pseuecr PORT 


O01se8 ave HOV” PORTE PTNGR shove £08 7 gbpRESS OCATI TION F FOR TYPEOUT 
1 MOV #13,RPCS1(RO)’ SSUE RE THROUGH 


ak REM THAT DRIVE IS SEIZED BY PORT A WHEN RELEASED BY PORT B 


=co= oo= 

Ww 

ae Ss 
ite =8 
pits ty 
e 

























a 
. 
se 5 # male re 
ra - = Ee EE laveerciewra reroout 
538 eos Babee BBiies Ray BRPSERS TR rERCERAONRG RE AYPECUT 
he] bee 001566 ore3s nov ey sey ed ar FOR TYPEOUT 
4B99 33 EO BOS Py, PORT B ZERO 
‘ 22t : ERROR . be 
ea ve 3s — Rov Hore wer ee FOR TYPEOUT 
308 : 67S: ERAOR y | T REGISTER ERROR 
ae + 2 2 ies ee RS cIcRaGaT "MFO fare" 
sig 1188 ei RF " SBDADF W REGISTER. ADDR 56. 0F ERROR MESSAGE 
uaia OBE © B68 ae ) 
wale De 6M HOV BOOAT , $T ne ‘a TO *STMPO 
17 036 64 MP T’ST ITS 

ai ay cs cis De RASKED BITS 

a4 Ble oe sTmP4, T W it A FOR TYPEOUT 

bes: Ror CKERR ‘ere THE REGISTER COMPARE ERROR INDICATOR 
VB 


PORTA, past RO) LECT POR 
PORTA 


sees 
: 


34 MOV TA ;MO T se To ATION FOR TYPEOUT 
CLR RR’ ve, POR TADORESS ERROR” PNOTCATOR 

26 MOV RPDS! (RO) SBDDAT’ ;GET CONTEN TS. OF R 

22 MOV 1,SBDADR ;FORM REGISTER BODRESS- be ERROR MESSAGE 


SUE E RL 


1 
1 
1 
1124 1 
1 
i 
1 


P22 Stt? 





EEE § 


es 


001126 





RERRERISSS ISSR ARIAS 


70S: 


NO? 


BGCEb! SOCLONG) BINOV" Test ShORT REQUEST’ FROM PORT *A’ 


} Ss 
Sure NTS TO *STMPO’ 


Fe ere 





uprae 
in 
A i 


Bafa FoR TYPEOUT 


ve 
yee aul GIS t8r COMPARE ERROR INDICATOR 


33 SHRSELLSASASSRESSSRSAREE ESAS ESSERE ARERR ERE RARE LLL RA ELLER SEES 


72S: 


738: 


74S: 


;RELEASE THE ORIVE FROM PORT A 


MOVB PORTA, RPCS2( RO T POR 
nov ORAL Pres nove PORT, ebpress, 7 
VERIFY THAT THE DRIVE IS IN NEUTRAL 


FORM THe 





WPRRCUIERE | 





MOV 
MOVB 
Ts! 
Q 
MOV 
MOV 
MOVB 
TST 
BNE 
MOV : 
MOV 
ERROR : TYBE  ERROE 
MOV te SBODAT Sok FOR S BIT 





i= 


ak 

ts 
: oF fy EQ@ ZERO FROM PORT B. 
pats iF 


gear ian ie TYPEOUT 


ERROR ’ eo icer 
peeve? FOR TYPEOUT 
I CONSTANT 


: TATUS REGISTER FROM PORT A. 
NT BITS FROM THE COPY 
STATUS REGISTER FROM PORT B. 


NOENT ITS FROM Wy COPY 
GISTER THE SAME F SOTH PORTS ” 


ARE THE SAME: ARE THEY ZERO ? 
IS HEY CHECKS OR NOT SEIZED 


DATA’ E on RROR MESSAGE 
EST SHOWS DRIVE NOT IN NEUTRAL 


us'co O FROM PORT A. 
ST DRIVE NOT IN NEUTRAL 
A ERROR PrPE OUT 


ERROR’ INDICATOR 
XE 26 
FAILURES WHEN RPOS1 READ 


SEG 9091 


B08 


EZRIEBO, OL CTRLR LGC» BECLS! SOCLOMG) OY-NOV-77 or! BORT REQUEST’ FROM PORT 'A’ Seo D092 
i a a ey 
: OR 2 ; poRT RR 
011 75S: nov $1MP3, $80DAT } FOR BIT FAILURES - FROM PORT B. 
001172 cn $cD0AT, STHPS ; SEE ofthe OK FROM PORT B. 
mete RROR 7 : EPORT ERROR 





NOP 
18: SCOPE ;LOOP ” 


CZRJEBO, DL CTRLR LGC MACYI1 30(104%6) O4-NOV-77 48 PAGE 
CZRJEB. bil O4-NOV-77 13:27 Tel test’ *pORT REQUEST’ FROM PORT 'A’ SEG 9093 


St LL Ld debababababcbabebohabadababtaltatrialalahelabalalelebelslsiaielalaletel 

; ATEST 22 TEST PORT REQUEST FROM PORT 'B’ 

i EVERIFY THAT WRITING A DRIVE REGISTER SETS 'PORT REQUEST’ WHEN THE 
DRIVE IS SEIZED BY THE OTHER PORT. 

A. SEIZE THE DRIVE THROUGH PORT ’A’ BY WRITING 0’S INTO RPOS1. 


8. wate RPDS1 FROM PORT ’'B’; VERIFY THAT THE ORIVE IS STILL 
0 ar %AQ’. 


Sane 


e@eeee ee OF Oe et ee ee oe ee ee Ge ee 
= ec mee we ee ae we me Oe we 


soit 4 car a Ser EAE Pay Boe ARENA ON BOTT S SPP 
2013 Se 
Bois ” AeSUE ED FS NEUTRAL AND THe : Dune The ITHER R afrentiON BIT IS cer. ~~ 
5013 H + 9b Ab 3b Mb Ob Hb Hb AG HEE HE AE aE A a a a aaa a a aaa aaa EE 
18 O26744 +6122: 
5019 026744 005737 001274 Ts KYBCTL ;PERFORMING ONLY SINGLE TESTS ” 
agers 137 002602 a : TURN nex P TEST NUMBER 
GSErED T1Erat bnnoee BBNGS HE: Bile a HES °HieaEn"es”_molenron 
Give Slee Gerae lite RN SITEE Room LES UR Ot TEale ORE 
heat 1 zi re48 BOL i3e HOV i$ Hr i ONS 
027016 Ole 001100 TEST22: MOV BSTACK, SP ‘Load THE STACK POINTER 
;CLEAR ATTENTION BITS FOR BOTH PORTS 
027022 113760 nov PORTA, RPCS2(RO) ;SELECT PORT #A 
1, ik ROB P Te ste 
7056 CORe ut3 Fo f THE DRIVE THROUGH PORT ‘8’ 





MOV 1(RO) 

nov ala isi} RELEASE THE ORIVE 

5 5 Mab AE Ab a a ab a a a a a a a a a a a a a a a a a a a a aa a aaa a aaa aaa aa aa 
;SEIZE THE DRIVE THROUGH PORT A 


508 A i Book? nove TA’ aysetzer st Re PORT’S ADDRESS 
7i1e 12 CLR RPO 15) e. T 1 
7i : 901240 HOV 18, OPP PRT ao Ire” PORT ADDRESS 
955153 sf eet MOY pont BB Dove BORF absresé TO LOCATION FOR TYPEOUT 


5p PES E ESSERE SLE AE LEAR RELA ALA LAELSLAELASAAARALA RES LAE LEE ETRE 


SS a282 28! S38 SRT ER ORNS ON OS 


oO~ 
pee he 
Ww 
NN 
8S 
Bo 
= 
turu 


8 
NY 


08 


CZRJEBO, OL CTRLR LGC MACY11 30(1046) O4-NOV-77 17:48 PAGE 94 
C2RJEB.P11 O4-NOV-77 13:27 Tee TEST PORT REQUEST FROM PORT ’B’ SEG 0094 
5084 ;SET PORT REQUEST 
S 027140 O0S060 O000le CLR RPOS1 (RO) ;SET PORT REQUEST FOR PORT B 


g s SHEKSSSSSSSSSSSSSSSRSSRAKAAREASAASSAEAASAERRAAARRARAARRARARRKREE 
i RELEAS —E THROUGH PORT A. ORIVE SHOULD SWITCH TO PORT B. 


;RELEASE THE DRIVE FROM PORT A 


ate 413589 001584 Boreas NOV” PORTA PTNBR. ; Move PORT ADDRESS TO LOCATION FOR TYPEOUT 
71 012760 000013 000000 MOV #13, RPCS1(RO)’ SSUE REL THROUGH PORT A 


; VERIFY THAT DRIVE IS Se1Z6D BY PORT 8 WHEN RELEASED BY PORT A 





CLR aT | Cone ISON CONS 
0011 MOV 5 Geet SON CONSTANT 
0011 MOV 
ADD "FOR TYPEOUT 
MOVB 
MOV co od ar ON_FOR TYPEOUT 
ve fel T PORT B 
MOV US PRON PORT FOR TYPEOUT 
MOV 
9 TATU Ro poate Bosh? 







SEURAIERSBSE RATER EB IS oa IaN Soe CeO e ORS aaa 


MPO 
Q 6S ; 
OR } s 
66S: MOV : T ; ‘stat A 
MOV T ; Been BOR 8 TYPEOUT 
cH : t, s i POTH 
OR " PORT REGISTER ERROR 
67$: NOP 
MOVB TA, RPC "hove 
MOV ORTA, PT Ese f° ATION FOR TYPEOUT 
CLR CK E INDICATOR 
v at 0), $E roe OTE NT RPDS 
MOV RF BDROR aie oe fe x ERROR MESSAGE 
cok + WHAT T ge 
MOV : TER ON NTS TO *STMPO’ 
BIC is Ss 
se 
if? at Pert ar 
102 Bis H BOSD DATA FOR TYPEOUT 
i103 ERROR 1b : TYPE "ees 16 
104 ial COM KERR :SET T STER COMPARE ERROR INDICATOR 
198 Nove PORT »Recse (RO) ESET bon 
610 MOV PORTB’PTNBR nove ORT ADOR Ese TO LOCATION FOR TYPEOUT 
£108 CLR CKERR’ ERE CK K ERROR’ INDICATOR 


E08 
EERIE Pie "BacNb vez? Tarapt SOCTONE? ,OS-NOv~ Test PORT ee PORT 'B’ SEG 0095 







V-77 1 
12 0011 MOV GET TENT RPDS 
Bot Ss MOV ie REGISTER ERROR MESSAGE 
ADD 35 
001 124 MOV 
i 001164 MOV SI R ¢ TENTS TO ’STMPO’ 
001164 BIC Fie BITS 
1124 001164 ce BITS 
001126 001174 MOV DATA 
1 1174 IC PASKED BITS 
001174 001124 Is WITH GOOD DATA FOR TYPEOUT 
OR TYPE SSAGE 28 
001244 _ Con :SET T STER COMPARE ERROR INDICATOR 





5; RAARREEAS SELLA SRSA L ERE AALS AAASELAA SEALE AASHRAAELLARRAESLALAES 
;RELEASE THE DRIVE FROM PORT B 
OS EE BR LAIR see go vem 
; VERIFY THAT THE DRIVE ts IN NEUTRAL 
set “— My "RELEASE ERROR ° INDICATOR 
sOoR 7 bal eiroos? pega! FOR TYPEOUT 
if a BEER foncrent 
Hay REGISTER FROM PORT A. 
NDENT BITS FROM THE COPY 


bb bb bb be Bo be Be be Be Be be Be he fe ee hw oe Be ho he he ee 


FOR GOON LON ODDNIT EG OBBIERERESSSIRN LON OODITNEOUKO | 


ae = EEE 
ONONNNO NS 

qaeessae 

o = 

= - a 
=e =O ) 
BRETT iB 
qUasaeeaaags 


Heel? REGISTER FROM PORT B. 


Toi NDENT BITS FROM THE COPY 
aie REGISTER THE SAME FROM BOTH PORTS ”? 





CVV VOUT VU UT TUT TUT TTT TUT UT TUT TUT UU UT UT UT UT UT UU UT UT UT UT UU UT 





1 
1 

1 

1 

1 

1 

1 

1 

1 

i 

i 001164 060 MP 

1 001164 ea ae TERS ARE THE SAME: ARE THEY ZERO ? 

i oue ERROR NOT UT OR NOT SEIZED 

1 3 930180 one OPT EN THE-G exe 

1 37 ll 001126 72S: MOV nt fos DATs SR RROR MESSAGE 

i Bole sed nov ie NG T SHOWS DRIVE NOT IN NEUTRAL 
} ice 001164 rst ree "EQ O FROM PORT A. 

1 13737 1284 001234 MOV tee DRIVE NOT IN NEUTRAL 
1 01 1172 1126 MOV YPE OUT 

1 750 1224 000010 MOVB a oonT 

i 292 1166 rst F STATUS EQ ZERO FROM PORT B. 

1 016737 427277 901260 73S: MOV mm a “. LEASE ER ERROR’ INDICATOR 

1 12760 0011 000000 MOV 1‘ RPC EAR 

1 012760 000013 000000 MOV 5 RPSL CRO sehen! THE bei ve 


gRiee-P1l- - O8 


UUUTUTUTUT UU 
2 ee ee pe 


WR Ow VN Loe Owed VOW Fuse ube a 


UU UT UT UT CUT UU UT UU UU UT TU 
Dm ae ee he be be he he hw ho ee he be be he be ee 


BBOP89 
iciteteitsteiicts 
NITLESOS YY 


see8 


x 
BB 


Ww 


38 


$210 8 

1 10 
Bis Bee 
S214 030530 
Sells 0302 
Sele 93024 
esi? 030250 
S213 
S220 


LGC 


-NOV-77 13:2 


macy)t 


30( 1046) 





000000 


=“ saab REGUES? FROM PORT 'B’ 
74S: °* nee, sa0p0 113k oC FAILURES WHEN RPDS1 READ 
oe gone STMP2 ; Ugits 5 Ok? 
i I ROM PORT A. 


Be Fon READ OK FROM PORT B. 
PORTE ERROR 


SCOPE ;LOOP ? 


7S$: mov AT : CK T FOR T FAILURES - FROM PORT 
BY Fuwa.pinge SN fatal on. 


76S: 
1$: 
ifest 23) TEST NO PORT REQUEST’ LMEN READ RPCS1 THROUGH PO 


; ATES TEST NO ’PORT REQUEST’ WHEN READ RPCS1 THROUGH PORT ‘A’ 
entry 16 READING THE CONTROL REGISTER (RPCS1) DOES NOT SET ’PORT 


:* AL IZE THE DRIVE T H_PORT ’B’ BY READING RPCS1. VERIFY THAT 
a EAE RT VE OR Been 
if B. READ THE CONTROL REGISTER FROM PORT ’A’. VERIFY THAT ’DVA’ IS NOT 
a ' 
t# 6. A RELE THROUGH PORT ’B’ RIFY THAT THE DRIVE 
i RETURNED T0 NEUTRAL AND THAT NEITHER A TENTYON BIT IS SET. 
ei eR ee eee 

Ist KYBCTL RFORMING ONLY SINGLE TESTS ” 

BPL is :BR IF JUST ENTER 

JMP XEC *RETURN & ue ; "NUMBER 
1S: MOV 8-1, KYBCTL ;SET SINGLE TES XTND ATOR 
2s: HOVE ‘ : $1 TNM iT T N R a 

MOV aT 218 sSLPERR L Oop oN i OR ADDRESS 

MOV r St S ;;00 4000. TTERAT 
TEST23: MOV aSTACK; ; LOAD STACK POINTER 


;CLEAR ATTENTION BITS FOR BOTH PORTS 
MOVB Resi eens ne) LECT_PORT 8A 


CLR ; T Iv 

MOV ie 1cag ; SIME ORIVE 

MOV ; VE 

MOVB af Lhe, ; 

CLR ; ve THROUGH PORT ‘8° 
HOV ri iy BRIVE 

MOV RPCEL ; ec Ss VE 


§ RESESASALSRALALALAELKERSLAALALAALALAALLLAAELLLLERLAAARATAELARARRAARE 


SEG S0SE 


GO8 





CZRJEBO, DL CTRLR LGC MACY 1 3011046) O4-NOV-77 17:48 pace 37. 
CZRIEB. P11 O4-NOV-77 13:2 T23 TEST NO *PORT ST’ WHEN READ RPCS1 THROUGH PORT ’A’ SEG 0097 
5888 ;SEIZE THE DRIVE THROUGH PORT B 
58 MOVB B Pon 
55 iB T’S ADDRESS 
nOvB 
nov pobaess FOR TYPEOUT 
Vv Tepe BobRE Ss PORT B 
pried : Re TER ADDRESS 
eck : 5 Ste "Be 
CMP ; We REGIS 
EO ; F it 
35 RROR ; 
3638 _ MP i ByPReS RE r Ort THE SUBTEST 
2638 19 , MOVB PORT BPC shan ; SEL’ ie asf 
Se l2 MOV PORT TO pOCAT ION FOR TYPEOUT 
e54] 001126 MOV RPDSI LRO FRR gCORRECT STATUS 
D011 MOV toca? OBR Der tvy 3 crep 
5e4 001166 MOV To StNPL: ae 
COM T a T Jip STATUS 
001164 MOV T,$TPo 
001164 BIC al aoe 
001164 CMP + \ ST E Fetus BITS SET ? 
5247 BEG 65$ 
2sig RROR S PORT Her 
6SS: NOP 
S2es0 000010 MOVB PORTA, RPC er pen 
5251 001234 MOV PORTA, PT Move ADRESS TO LOCATION FOR TYPEOUT 
Ses3 ge ae ae ab ab a a a a a a a a aaa aaa aaa aa aaa aaa EE 
2sod READ RPCS1 THROUGH PORT A - TRY TO SET PORT REQUEST 
eeee 930470 1244 CLR CKERR ;CLEAR THE °C Ck ERROR INDICATOR 
Les 180 $6118 nov 22 {R02 $B00AT REGISTER RT be ERROR MESSAGE 
2528 030816 il ADD RO rs RH11 B AODRESS 
ese? a ea it 1164 abv T, ST i MOVE e131 R CONTENTS TO *STHPO 
sie . 7 « 
Seb2 O3s0ese 3535 1 4760 601164 BIC #tC407? stp ; SAVE ctr D Bits 
Seb3 930534 3737 001124 001164 cn GDOAT, $ MPO ; CONPR BITS 
ese 44 013737 1126 001174 MOV $8008T $TmpM : COPY "BAD DATA’ 
este 52 37 0 001174 BIC #4077, $TMP CLEAR MASKED BIT 
5267 030560 053737 1174 001124 BIS STMP4; SGODAT ;°OR’ WITH GOOD DATA FOR TYPEOUT 
espe §38258 pep 49 001244 EGnen eReRR 8 rotne REGISTER COMPARE ERROR INDICATOR 
2670 030574 900240 66S: NOP , ss 
2558 SSLAAAASAARSSKAAKAAAAARALASARSKLKSSAABRKRARRKRAAHERAAHARASRRRRARE AS 
267 iORIVE SHOULD RETURN TO NEUTRAL 
e552 


S276 ;RELEASE THE DRIVE FROM PORT B 


HOS 


C2RJ DL CTRLR LGC. MACYI1 30(1046) O4-NOV-77 17:48 pect 98 
ESRIEB P11 O4-NOV-77 13:27 Te3 TEST NO "PORT REQUEST’ WHEN READ RPCS1 THROUGH PORT ‘A’ SEG 00928 


1373? BIS 689949 Hove Bont Bre “a hove SBbAF aboREse TO LOCATION FOR TYPEOUT 
012760 MOV #13, PORT B 
T 


tata 
sa} t 


Se oe Vea HELE att 
ee ff 
> 3 Toro 
ier 
Bacdeasass 
Sines vaes 
S88 
Ss 
3 
o o~ 


RPCSI(RO)’ ;ISSUE RELEASE THROUGH 
HE DRIVE IS IN NEUTRAL 


ilk EAODRESS OF Rposi FOR TVPEOUT 
bel . My ancenal CONSTANT 


id chit REGISTER FROM PORT A. 
AR NOENT BITS FROM THE COPY 


; VERIFY THAT T 
CLR RR 
MOV 


t,he 
nov cp 


8 


001122 


COO I~ Oro’ 


T 
v ‘ae PORIVE TATUS REGISTER FROM PORT B. 
5 glee Bene BH a Palate he i baie 
1 1001 011 BIC Sarai iy sTMP ;CLEAR_ PORT NDENT BITS FROM THE COPY 
3737 OO1164 9011 CMP STMPO, StMP ;1S THE STATUS REGISTER THE SAME FROM BOTH PORTS ” 
a te 001164 S sige ga: TERS ARE THE SAME: ARE THEY ZERO 7. 
2300 030742 Daove sins ERROR 3s RE Lane T ARSE OR NOT SEIZED 
) : T > SET TA FOR s ERROR MESSAGE 
a a eee ee ae eae 
230¢ Oaoree ADeTSS Bolten PoomLe reve PORTS, a Lae A Tue’ EQ O FROM PORT A. 
5 414 Q : RO 
fee Boe Slee pies me Fy co cre, Rae TaN ki RIRS.OIME "OT 1m neuron 
2 O31033 a857 37 bor iee = ney PORTA, “sasle mcaioasn ‘gee © TaTUs EQ ZERO FROM PORT B 
Bit B3185E 012799 177777 001250 69S MOV fos" 1 i Re ERROR’ INDICATOR . 
ae 2 iets Bene 
Bs B3ibse BISTER 888014 Bdodcd ae ae Se 
5316 931054 9137 ? 001170 001126 708: MOV ine 100k OR BIT a dt WHEN RPDS1 READ 
31 1 13737 001224 001234 MOV one 
3318 B3iGre 37 f 00i12e4% 001170 ne st STMP2 eh oF or BITs TS OK -— 
é 11 i RROR 
5321 O311 13737 001172 901126 71S: MOV AT CK T FAILURES - FROM PORT B. 
2355 B3iits Biaess potsze 01254 MOV 113, BPRBR CHECK Poet NUMBER 
5323 031116 023737 001124 001172 CMP scooAt, STMP3 ;SEE IF READ OK FROM PORT B. 
5304 031124 001401 BE :BR IF OK 
£325 O31lle6 104007 ERROR ges !REPORT ERROR 
2355 §3ii3o pobere ig; SeoPE LOOP ? 
e ~~ $ ’ 
£255 g test og TEeT NO PORT REQUEST’ WHEN READ RPCS] THROUGH PO 
2220 ; ATES 24 TEST NO "PORT REQUEST’ WHEN READ RPCS1 THROUGH PORT ‘eB’ 
£322 ‘ SVERIFY THAT READING THE CONTROL REGISTER (RPCS1) DOES NOT SET ‘PORT 


SOSBSEBESCE 
RETRO EGS ?? 


BOEBOSSS 


ERESR YON 


fur 


25 


OOr- 
S88 
S88 


aera 


SSSSSBBSSSSRRSee8 
NETRA SR ENTER 


be a te ae te ke ee te uy 
SERRORVOS ISS 

kt ~Oa@ Vou 
ee ee 


WwW 


ON 
orn 


I08 


3011046) O4-NOV-77 17:48 PAGE 39 
Te4 TEST NO 'PORT REQUEST’ WHEN READ RPCS1 THROUGH PORT °B’ SEG 9099 
# REQUEST’. 
te A. Z—E THE D THRO! PORT ’A’ BY READING RPCS1. VERIFY THAT 
i ® SD7BRIUE ARE “BeEIPOY PC 
i B. READ THE CONTROL REGISTER FROM PORT 'B’. VERIFY THAT "DVA’ IS NOT 
4 
:# 6C. LE THROUGH PORT ’A’. VERIFY THAT THE DRIVE 
i BeFUE ED TO RENTRAL THAT NEITHER ATTENTION BIT IS SET 
ee 
TST KYBCTL ; RF ORMING ONLY SINGLE TESTS ” 
L : ani Mgr ENTERED TEST 
IMP Cc TURN & GET T TEST NUMBER 
001274 1$ MOV, #1, KY TL ; TSI ales x INDICATOR 
sete MOV A eafss sipADR ; LOOP ON TEST ADDRESS 
Ooi 40 mov TESTOY SLPERR ; LORD “593. .f1 RROR ADDRESS 
TEST24: MOV e100.» 3 7 BRo Ric ATOMS 
;CLEAR ATTENTION BITS FOR BOTH PORTS 
000010 Hove PORTA, RPCS2(RO) ; 1" PORT 8A 
oo00000 MOV sil, 1(RO) ae AYE op 
990009 MOV a RPCS1 (RO) : HE DRIVE 
1 MOVB te S2(RO) ; 
mas CLR RPOSIERD) | cane ee THROUGH PORT ‘8° 
S8o000 MOV oid Regal (Ro) >REL ve BRIVE 
Ne eee nee ttt tk kkk alalakahhalahaialaiaiaiaiabelaheiaiicielcidicielel 
;SEIZE THE DRIVE THROUGH PORT A 
000010 MOVB PORTA, RPCS2(RO) ECT PORT A 
001236 nov Bie T :st0R SEIZING PORT’S ADDRESS 
000010 MOVB PORT ar re 
001234 MOV PORTB. dove? 11, LOCATION FOR TYPEOUT 
001240 MOV PORT 
001126 mov 18 opr aor a aie i} Dery "seize By PORT A 
001122 ADD Ro $8 i, , SBDAODR Be Pee ADDRESS 
CLR $<008 goal 
001126 cnr SGDDAT, SBDDAT I GIS R FERS 
ERROR 4 parr! THE SER 
a IMP 1$ :BYPASS REST OF ORE SUBTEST 
000010 ‘ MOVB PORTA, pecs (AO) -SELECT PORT A 
001234 MOV PORTA, PTNBR move PORT ADDRESS TO LOCATION FOR TYPEOUT 


SeeRRSERSaS 


SBSRREGRER 


intagatatatayat ata Bowne 


UU 


SELES LECLL£O 

bs be be ae ee be Bee 

WONMOUW £ WHO 
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DL CTRLR LGC MACYI1 30(1046) 04-NOV-77 48 100 
l O4-NOV-77 13:27 T24 TEST A *PORT Quest’ WHEN READ RPCS1 THROUGH PORT ’8’ SEG 9100 
1406 016037 001126 MOV anor fecn! Palio IF ae oe EES CORRECT STATUS 
1414 Ol i 0011 MOV ay: CT 5. sTA 
Ra ee gle Bilt & fore nt eee sums 
14 1 ca 1188 001164 MOV T,$1mPO Ee TaYUS 
144, 1166 001164 BIC CLEAR 
i 37 001124 001164 cnr Scopatss STMPD oe 1 Fatus BITS SET 7 
14 — ERROR S PORT THE E 
i464 113 1226 10 js MOVB PORT » RPC (RO) 
i392 b13589 Bisse eT MOV PORTB, re ADRESS TO LOCATION FOR TYPEOUT 
3 EAD RPCS1 THROUGH PORT B . TRY TO SET PORT Reger 
READ RPC THROUGH PORT 8 - TRY TO SET PORT REQUEST 
1500 1244 CLR CKERR sCLER 7 HECK ERROR® INDICATOR 
1 16037 901126 MOV S1(RO) : T CONT 
i 1 1 0009 ll2e MOV aie REGIST R Pee x + ERROR MESSAGE 
1 ll CL : Reed ret Be 
i 137 17370 BOT ied t: TMPO éaves 31 i 5 CONTENTS athe taint 3 
1544 boii 001164 MP . B Re" 
1552 A4h4 BEQ IF 
1554 0137 001126 001174 MOV > COPY " BAD DATA’ 
31562 2737 004077 001174 BIC ? CLEAR MASKED BITS 
1370 05:37 37 001174 001124 BIS 5 eal Th GOOD DATA FOR TYPEOUT 
31600 005137 001244 a CoM get THE REcieteR COMPARE ERROR INDICATOR 
g ‘RIVE SHOULD RETURN TO NEUTRAL nnn NRRESS 
;RELEASE THE DRIVE FROM PORT A 
1606 113760 001224 co0010 MOvVB PORTA,RPCS2(RO) ;SELECT PORT 
1614 013737 OOlee4 001234 MOV PORTA’ PTNBR ; MOVE ORT aboRESS TO LOCATION FOR TYPEOUT 
1622 012760 oO000i13 9O00000 MOV #13,RPCS1(RO)’ ;ISSUE RELEASE THROUGH PORT 
;VERIFY THAT THE DRIVE IS IN NEUTRAL 
1630 1250 CLR RR ich AR rte ASE ERROR ’ INDICATOR 
1634 13939 00612 001122 MOV RPDS $8 SBDAOR Fee 8 OF OF RES! FOR TYPEOUT 
1646 Oi 4 1765 124 AY PCH: RpRY! Vy nm ISON CONSTANT 
1654 it 1 10 MOVB PORTA cbet 
1662 O1 12 1170 MOV 1tRO), $TMPe ; He’ DRIVE. STATUS REGISTER FROM PORT A. 
1670 013737 0011 001164 MOV STMP2, STMPO ir " NTO 1 MPO’ 
1676 Oe? 37 1 O1 B01 164 BIC saTal Vy, STHP 3 CLEAR Po P NDENT BITS FROM THE COPY 
1712 t2059 00001 wee MOV RPOS1(RO),STMP3 ; al THe’ BF SRI “STATUS REGISTER FROM PORT 8. 
1720 013737 00117 1166 MOV STMP3,STMP1 ‘ee py IT INTO °STMP1’ 
1726 942737 100100 001166 BIC #ATA'YV,STMP1 :CLEAR PORT DEPENDENT BITS FROM THE COPY 


BOOTORBOOR08 BoE 


KO8 
SunOS Tare? sap is req’ fest hd 519 RT REQUEST’ WHEN READ RPCS1 THROUGH PORT ’B’ SEG 9101 





37 001164 001166 CMP $IMPO, STMPI ;IS THE HE STATUS REGISTER THE SAME FROM BOTH PORTS ” 
: 001164 Ss TARO ; was RS ARE THE SAME: ARE THEY ZERO ” 
oR 4 : T IN NEUTRAL OR NOT SEIZED 
140 IMP 72s >BYPAS ie THE CHECKS 
1 1 1 26 68s: MOV STHp : T ; DATA FOR ERROR MESSAGE 
1 : “7 MOV PORT + PTNBR ag) 17ihe EST SHOWS DRIVE NOT IN NEUTRAL 
a4 1164 Tey STMPO’ H Pie EQ O FROM PORT A. 
137 00 12; 0012 MOV TA,PT : ING PORT IF DRIVE NOT IN NEUTRAL 
ot B01 ize 001 4 MOV hed SBD08T OO ;? TA’ F ERROR PPE our 
253 7 001166 Tey TMP 1 8G STATUS EQ ZERO FROM PORT B. 
1 23 77777 69S: MOV 8-1, RR : INDICATOR 
E 15> 11 00000 MOV «SI LRPE ST CROD a Ae 
3 2760 000013 000000 nov #13, RPCS1(RO) He DRIVE 
sues 4 lodge 901170 001126 70S: RO y o $TMP2, SBODAT $LOOK BOR NUMBE 7 FRILURES WHEN RPDS! READ 
es 
sue? 1 3737 0011 DoT 30 CMP $cQ0At, STHPe ia TS TS OK? 
ees 03210 : 14 E BEG 1 ROM PORT A. 
5470 0321 13737 901172 001126 71$: Rov stip » $BO0AT enero 51 FOR BIT FAILURES - FROM PORT B. 
a Bae 143; Boris 001172 che $60 +, STMP3 fe Ren per OK FROM PORT B. 
474 1 1 ERROR 7 } ee ERROR 
5475 O35tap 728 NOP ‘ 
ey 032142 eee 1§ SCOPE ;LOOP ? 
5478 
479 RESSKRAAAKAKAAALAAASKAKAKARHKRERAKAEKRRARARAERRLERRRSRRAARERSRRKLELS 
ego jATEST 2s TEST RELEASE BY PORT 'A’ WHEN SEIZED BY PORT ’B’ 
54e2 : SVERIFY THAT A COMMAND ISSUED BY ONE PORT IS NOT RECOGNIZED IF THE DRIVE 
e483 i IS SEIZED BY THE OTHER PORT. 
Bugs i SEIZE THE DRIVE THROUGH PORT 'B’ BY WRITING O’S INTO RPOS1. 
ne :# . ISSUE A RELEASE COMMAND THROUGH PORT ’A’. 
eiee i C. VERIFY THAT THE DRIVE IS STILL SEIZED BY PORT ‘8’. 
e131 : * D. RELEAS THE DRIVE THROUGH PORT 'B’. VERIFY THAT THE DRIVE SWITCHED 
5493 :# 
Eucy $# E. RELEASE THE DRIVE THROUGH PORT ’A’. VERIFY THAT THE DRIVE RETURNED 
2435 # TO NEUTRAL AND THAT NEITHER ATTENTION BIT IS SET 
alae 932144 j[etetesaeaneesenenenenesenenennenenenenensencanecenseaesesenenes 
5493 032144 005737 001274 KYBCTL ;PERFORMING ONLY SINGLE TESTS ” 
§500 O22150 091406 BEG 25 :BR IF NOT 


LOS 


TERT EB ee Mt TREE bGSon Tgcast SOCLONE) QB-NOV~ 77 Sr RELEASE GY PORT ‘A WHEN SEIZED BY PORT 'B: SEQ D102 





Boe BS ome a a se 
ie: ae: LBS ESS Ss TERT SESE 
208 Sie 015706 Coll 1178 TEST2S: MOV ee. STACK POINTER 


;CLEAR ATTENTION BITS FOR BOTH PORTS 


ponta RPCS2(RO) 
Py ie 


. ras, 
MOVB cite Sotko) : 
CLR ; ne THROUGH PORT ‘8’ 
MOV 1(R9) : 
MOV “Be 1¢ ; 


5 Mea AE ae ae ae ae aA a ERE REE ERE E EEE EE TEE 
;SEIZE THE DRIVE THROUGH PORT 8 


por eae Ov Sar eh pies Pon T’S ADDRESS 
937838 MOVB (RO) 
1 att S79 Loc OCATION FOR TYPEOUT 


UHUNUTUTUTUTUTUNUTON TURTON 
Oe Ob Oe be he pe he 
WONG U FS wru-O 





bebe 


g 
Eee 
Ronis 
ay 
pz 
<<25 


SRR 
oo 
ag y 


Ww) 
=o 
or 






1 
1 MOV 
5530 13737 1240 MOV T 
es i 001126 mov t pessoas spits By PORT B 
001122 Fenge ADDRESS 
2 cok ice eee BE ZERO 
2e39 Beare 3737 001126 CMP $¢ T,SBODAT ; oe UREGISTER ZERO 
2235 374 «1 BEB oR 4 : port t THE ERROR 
5833 ie 000137 ia IMP 1s ;BYPASS REST OF THE SUBTEST 
13 10 F MOvB PORTB T POR 
4 1 13399 1234 MOV ve" ¢T bor TO phOcATION FOR TYPEOUT 
seus 16 016037 1126 MOV peat ha aie T SEES CORRECT STATUS 
cS4 127 1124 MOV pe ren STATU 
SS44 13737 1166 MOV FeSTMP I sUSE Ata’ MASK 
cent 1164 soy fet po | eRe HE Te trans? ST 
554 37 oot 164 BIC ue ae TED BITS 
549 37 , 001164 bro +" STHPO ee ie THE EXPEC ED STATUS BITS SET ” 
sO j RROR .* PORT T OR 
see) 032472 000240 65S: NOP ™ 
sss. 5 RES R SEARS A EERE EEE REAR EER EREERAERERA EERE EEE EERE EE 
2222 try TO EXECUTE A RELEASE COMMAND THROUGH PORT A 
S556 032474 113760 001224 oD0010 MOVB PORTA,RPCS2(RO) ;SELECT PORT A 


C2RJEBO, DL CTRLR LGC reply 30( 1046) 
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O4-NOV-77 13: 


890013 


12760 


poe 
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17:48 PAGE 103 
TEST RELEASE BY PORT 'A’ WHEN SEIZED BY PORT 'B’ 


MOV ss TO LOCATION FOR TYPEOUT 
MOV sth "Resi TROD’ MOVE SUE. A RELEASE COMMAND THROUGH PORT A 


g LERIFY THAT THE DRIVE Is STILL SEIZED BY PORT Bee 
:VERIFY THAT THE DRIVE IS STILL SEIZED 


66S: 


67S$: 


ce * INDICATOR 

(RO) ke 

8D ee s hy ERROR MESSAGE 

Cc 
14 Te fecistenr OK ; 

an 
OM 


+. 


ney REEL (RD SBpDAT SSOP REGISTER 
Br sue PR ad ; 
Rov © afRE,RPcsicRO) CLEAR *MCPET 


NOP 
BQ tae CONTENTS. OF 'RPOS1. SEEN By, PORT 9 
JMP 1$ 


IN NEUTRAL, BYPASS REST OF TEST 


; 
; 
rt as FS fer R_COMPARE ERROR INDICATOR 


fp SAASRASSSASLLSLSSSSSLLSSLAAESLASLLHLSSLELHLASLEAKLRLKLHLLLELERAAEE 


68S: 


;RELEASE THE DRIVE FROM PORT B 


MOVB PORT! 242 tae LECT POR 
HOV PORT vé“BoRT 


MOV La RPCSI TRO)’ y TSSUE TBP PRES, MROUe PORT Bo Te OUT 


; VERIFY THAT DRIVE IS se1ze0 BY PORT A WHEN RELEASED BY PORT B 


SAE ome BF eo LE a 
mi Em. pat ieee oh resout 


HOV RPDS TRO) STIG oe FROM POR ORT A 


MOVB 
MOV PORTB’PTNBR ; vi BOR ToL LocaT ON FOR TYPEOUT 
v a Teer ae 
ts STMPO FROM BORT A A Tease r 
BERR 1 ane IN N NE TRAL 
Vv fer stat ORT A 


ADDRESS. ron TYPEQUT 
CMP SGDOAT, SBODAT  Shewce sone CONS TAN 


ERROR 7 1 ee REGISTER ERROR 


SEQ 9103 


NOS 
CZRTEBO, DL CTRLR LGC, MACSI SOC1ONG) QU-NOV-77 ot DiBase BY PORT "AY WHEN SEIZED BY PORT ‘B° SEG O104 
033012 000240 69S: 


ae i 


;RELEASE THE DRIVE FROM PORT A 


MOVB TA,RPCS2(RO)  ; T PORT A | 
Rov. PORTAL PTReR. nove “PORT, eDOFESS, TO LOcALION FOR TvPEOUT 


;VERIFY THAT THE DRIVE IS IN NEUTRAL 





CLR ERROR ’' INDICATOR 
nov a 1 FOR TYPEOUT 
MOV . ASO ONSTANT 
MOV ; He RIVE, TATUS REGISTER FROM PORT A. 
nov ;COPY I *STMPO’ 
Bt Ca ; BR DEF NDENT BITS FROM THE COPY 
3 nov ; a RIVE | Teel? REGISTER FROM PORT B. 
033 IC : T ITS FROM H COPY 
03; ialad TMPO ; HE STA OTe THE SAME Fi BOTH PORTS ? 
03: S PAPO REGISTERS ARE THE SAME: ARE THEY ZERO ” 
033 ERROR ag ; T eT a UTREL OR NOT SEIZED 
033 MP 73% ; CHECKS 
533 70S: MOV THP2 , SBT SET re OR ERROR MESSAGE 
033 MOV 18, ; IZ NG T SHOWS DRIVE NOT IN NEUTRAL 
j MOVB TB; RPCS2(RO) ; Ect por oa 
are $ ; Z ATUS EQ 0 FROM PORT A. 
v pakta, PT ;SEIZI T IF TEST SHOWS D DRIVE NOT IN NEUTRAL 
MOV TMP3, T :? Ta’ FO ERROR TYPE OU 
MOVB TA; RPCS2(RO) ; L PORT 8 
rst TMP : nate TUS EQ ZERO FROM PORT 8. 
71S: nov if AEE ; Fan The BRL ERROR’ INDICATOR 
nn LLm Pe Els, 
72S: nov Svea, T > LOOK “Bont PRT CURES WHEN RPDS1 READ 
CMP +, STMP2 ; L — 
BEQ 7 ; : OR PROM PORT A. 
73S: nov sTHp  $B008T :C par post FOR BIT FAILURES - FROM PORT B. 
che ¢ +, STMP3 i READ OK FROM PORT B. 
BE ROR 7 ?REPORT ERROR 
74S: NOP 
1S: SCOPE ;LOOP ? 





Zs SHSKRSSEAKAERAASAAAEKAASAAASAAAAAREALELALSHLAARLLARRELA HARE EARERR 


BO9 


« LEASES ESSREEE ESSERE SEEEEE SAREE E REESE EERE EERE EEE EERE EE 


CZRIEBO ot CTRUR LGC  MACYI1 30(1046) -NOV-77 17:4 
eSRIEBP O4-NOV-77 Toso? T TEST Rei ease oY boar ’B’ WHEN SEIZED BY PORT ‘A’ SEG O1CS 
3 paTEST 26 TEST RELEASE BY PORT 'B’ WHEN SEIZED BY PORT ’A’ 
a SaVERIFY THAT 8 6 cn ONMAND ISSUED BY. QNE PORT IS NOT RECOGNIZED IF THE ORIVE 
7 a : 
S674 # A. SEIZE THE DRIVE THROUGH PORT 'A’ BY WRITING O’S INTO RPDS!. 
t# 8B. T T 'B’. 
26 rs B. ISSUE A RELEASE COMMAND THROUGH PORT ’B 
38 i# C. VERIFY THAT THE DRIVE IS STILL SEIZED BY PORT ’A’. 
# D. RELEASE TH THE DRIVE THROUGH PORT ’A’. VERIFY THAT THE DRIVE SWITCHED 
: # 
t# 6. THE DRIVE T POR RIFY THAT THE DRIVE RETURNED 
i LaF RAL AND YHat Ne LTHER ATTENTION Bt t IS SET. 
+ 


SeCRRDGRES 





bT26: 
1ST ¥ NG ONLY SINGLE TESTS ” 
2eat TURN? Whex P TEST NuMBER 
5632 1s: OV {SET SINGLE TEST INDICATOR 
- ee BS FE fs Tear MaRS, 
# 
a: TEST2b: MOY td e, Tier POSNTER 


;CLEAR ATTENTION BITS FOR BOTH PORTS 


2533 
‘ MOVB poRTA RPCS2( RO) ; T T 8A 
CLR : a I 
5702 MOV #11, 189) : cl Ear 
704 MOV ; REL 
705 MOVB S2(RO) ; 
’ 





. ee Lawes o ° 


55a aE a a a A a a a a a a aa aaa aaa aa a aa a aaa a aa aaa aaa aaa aaa 
;SEIZE THE ORIVE THROUGH PORT A 





MOVB PORTA, (RO) ECT POR 
nov ee sstOR PORT? S ADDRESS 
i MOVB DOF (RO), ¥ 
1 : BR pobaess'™ FOR TYPEOUT 
} v TB’ OPPR 


SOON £W- ODS VE 
ro 
— 
Ss 
88 


CUNO UTUTUTUTUU U UT UUUU 
tor 
LW 
“ 
a Le 
N 


NNNNNNNNNNNNNANNANNNSY 





MOV RPL Sacer sBy PORT A 
AOD Rapper SEDAOR TER ADDRESS 
CCR Rt if " Sie “4 

CHP REGIS 


37 GDODAT,SBODAT ;1IS ERO 


SSRyEB. ale C TRAE NOY: 77 9533! er icenet — test RELEASE BY bo8r 'B’ WHEN SEIZED BY PORT ‘A’ SEG 0106 
64S IF Breyer Ie 
oR 4 E 
: a ne is a ; BP oe SUBTEST 
an Sa ak Sa AE Sn 
tn SG Co. Rg et eld 
pot ied Roy MS ese s IT 1 
Sot ies Pe $60 +, $7 i Ms Ere ae eFatus BITS SET ”? 
, 
— ERROR 5 tREPORT THE E 


3 + SESE ESSERE REESE ESE EEE ESE REESE REE ERRE EERE ER EEE EEE EERE 
‘ try TO EXECUTE A RELEASE COMMAND THROUGH PORT B 


0 (RO) T 
Oo1234 nov PORTB: PT nove “Pont apBress TO LocaT LOCATION FOR TYPEOUT 
#13,RPCSI(RO)’ ovs Poe A SNROUGH PORT B 
s ssssoesonoevgugesseugessnsesstenszazsostenagtessueronserenserene 
VERIFY THAT THE ORIVE IS STILL SEIZED BY PORT A 





aia se CLR CKERR ; eee THE CH CK K ERROR INDICATOR 
001122 mB ; (Roe a flsiee ie OF ERROR MESSAGE 
001126 CRP T, SBDDAT : ae epodl: rm 
ER eet nas COMPARE ERROR INDICATOR 

O11 66S: ov 8 ( ) iF * es OF | RHCS1 
001126 OnePe, T ie. 

ERROR 11 2 ee 
000000 sna nov STRE,RPCS1(RO) nome MC 

ey —" of RPDS I. N BY PORT 8 

hig is 1598 ve IN ‘of Rebs i seen, REST OF TEST 


Neel LL LL kl dkdadalalelelalalabaialalalabababeialel 
;RELEASE THE ORIVE FROM PORT A 
000010 MOVB poate. » Bo CBE CRO nov 


Beles PRY ERTRSETTCR,, "Ov EON SPBEER®SROLAGAPERY ROR TvPEOU 


SSUE RELEASE THROUGH PORT A 
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5781 ; VERIFY THAT DRIVE IS SEIZED BY PORT B WHEN RELEASED BY PORT A 
? 70 CLR EAR ’ SA Eons 
74 V Evy SON CONSTANT 
2 MOV i R. 
11 ADO te TYPEOUT 
114 MOVB 
1 MOV er we ON FOR TYPEOUT 
3 i HOV tel TER F PORT B 
Bras 144 nov og Roh Boats FOR TYPEOUT 
1 : ip T OB ORT A ZERO 
Re a yee ee 
25e8 i 68S MOV t T ; CK ie A TatUS Bone 
ete B35 7 MOV Bont  5B008 if eels Foe FOR” TYPEOUT 
5799 034206 CMP +,SBODAT :COMPARE POT TH CONS TAN 
5800 Gaels BEG 
5801 O34 16 OR T REGISTER ERROR 
280e 0342 69S: NOP 
2804 ;RELEASE THE DRIVE FROM PORT B 
O34222 113760 12 000010 MOVB PORT (RO? LECT PORT B 
2809 034230 013737 001366 0012 MOV PORTE, PrN ve “Pont SS TO LOCATION FOR TYPEOUT 
5808 034236 012760 I MOV #13 Si(RO)’ Miser "REL ASE THROUGH PORT B 
2810 ;VERIFY THAT THE DRIVE ™ IN NEUTRAL 
pele CLR ; 
13 001122 MOV ; 
5814 ADD RO : 
2815 1 24 MOV i 
“8 1 ‘i 40 MOVB ( : 
1 1 x MOV tag ; 
1 1 b4 MOV ST 3 % : It IN 
4 BIC BATA! VV, ST ;CLEAR T sEreoe BITS FROM THE COPY 
1 19 MOVB TB Reese )} rect T 
582 1 2 MOV tQ) TMP ; He ca TATUS REGISTER FROM PORT B. 
1 66 MOV ST ) STMP1 ; I 
65 BIC TAIVV.STMPL =; EAR BITs FROM THE COPY 
66 THPO, TMP 1 : THE aTeR THE SAME FROM BOTH PORTS ” 
beet ene TMPO :REG a ARE THE SAME: ARE THEY ZERO ? 
364 BNe es 5 
OR 46 : REP NOT a OR NOT SEIZED 
Fa JMP 74S ;BYPAS 
1 26 70S: MOV stip i AT SET Sh ERROR MESSAGE 
5831 1 34 MOV ORTB; : a EST ay: ORRIVE NOT IN NEUTRAL 
1 10 nove PORT *RPCS2(RO) ; LECT 
28 4 A Tor $Tnp us’ £0 O FROM PORT A. 
5635 0344 01 34 MOV pagta, : wees PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 
cexe O34432e Ol 26 MOV STMP3.SBDODAT :*BAD DATA’ FOR ERROR TYPE OUT 
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5837 O34440 113760 001224 O00010 MOVB PORTA,RPCS2(RO) ;SELECT PORT A. 
7 001166 rst TMP : SEE SF n81 wgyrrus EQ ZERO FROM PORT B. 
4 1 77777 71S: MOV 511 Ree RR ; -REL eo INDICATOR 
i 1 600011 0 MOV #11; 1(R9) ; i 
S84 1 MOV RPC iR 
eeua 1 901170 001126 72s foun Fore, fax OR BIT ea $ WHEN RPDS1 READ 
S84S 37 301224 Ooi 234 ‘ MOV onra’ 5008 fe TBORT NURBE 
eee 4 0011 1170 MP $ +, STMP2 : L is ou S 
2e48 1 1 De 38 ; odh ROM PORT A. 
9 1 001172 001 738: MOV TMP3, T CHECK FOR BIT FAILURES - FROM PORT B. 
ceo Biase Clee BOUze page 7 RV Brera. pees 
5851 de 3737 O011e4% 001172 CMP SGDDAt, STHPS : SEE : READ OK FROM PORT B. 
S8Se 0345 001401 BEQ 4§ : 
5853 poe 04007 ERROR 7 ‘REPORT ERROR 
5854 54 40 74S: NOP 
o8S5 034556 000004 1$: SCOPE ;LOOP ? 
5857 
2o28 Z iteet op tect SEIZE BY WRITING ATTENTION BIT ee 
ses j ATE TEST SEIZE BY WRITING ATTENTION BIT 
eect i STEST THAT pat) ae tSes HE BPPROPRIATE RIVE BIT INTO THE ATTEN NTION REGISTER 
28be : # S THE DRIVE. Y THAT REQUEST IS SET FOR THE OTHER 
S864 $a 
BBbS i# A. ane te APPROPRIATE DRIVE BIT INTO RPAS; VERIFY THAT THE DRIVE 
S86 $a 
586e ‘* B. is 8 RELEASE. COMMAND THROUGH THE SEIZING PORT; VERIFY THAT THE 
5869 $i ee CHES OPPOSITE P ypooue A RECEASE THROUGH THE 
3870 i AND VER VERIFY THAT THE DORI S IN 
2058 BE geek agen mcr sae es 
ee74 34360 $737 001274 ; aia ORMING ONLY SINGLE TESTS ? 
5876 Buses 1 L ; F WSL RED TEST 
5877 0345 9001 002602 IMP TURN & TEST NUMBER 
2878 74 Ol 001274 1g: MOV ey eTaor XTND CATOR 
Baueie ots? Bot Nov ON ERROR PODDRES 
1 90111 MOV f es SLPERR R ADDRESS 
O34e25 1 6 1176 MOV 3 ; ATIONS 
034632 012706 001100 TEST27: MOV seTack’ Sp 1094 609. S AEK POINTER 
;CLEAR ATTENTION BITS FOR BOTH PORTS 


000010 MOVB P 1A, 5 ahaa 


1371 eM ; T #A 
44 12 CLR si tRp} : fete 
30 1 if 99000 MOV yl CSI1(RO) ; 
1 1 00 MOV #13, RPCS1(RO) iB RIVE 
l2e6 O00010 MOVB PO TB, RPCS2(RO) :$ 


7 

7 

691 034664 1137 
O34672 OOSCEO 9000012 CLR RPDS1{RO) SESE THE E THROUGH PORT *B’ 


uy 
iO 


seRggCenTERE 
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CZRIEB. P11 O4-NOV-77 1 
76 0127 1 MOV a 1(RO) ;ISS CLEAR 

S83; GE00% GLECES SBBGL SERB ABYC HALRPCSL(RD}  HAECVRGD*WE ShICE 

Sage REFERERS ERIEAAEKRALSERRLARERRGALASEERAREREEAHKELRRLANRGHSEGHE REESE 
3837 SELECT DRIVE OTHER THAN THAT BEING TESTED 

5899 712 1137 001230 000010 Move PORT (RO) T OR NOT BEING TESTED 

5300 72) 313389 Boise4 001236 MOV PORTA BES Set 5 ee Se BSE RODRESS 

$3902 fp RHRSSAESASLAASLSRSRAAESRAERARARRAA RARE RARER RERE SERRA RRRRAEEES 

5303 :WRITE THE DRIVE’S ATTENTION BIT 

2ape 034726 013760 001232 o00016 MOV 1, REAS(RO) WRIT THE ATTENTION BIT OF THE DRIVE BEING TESTED 
306 034734 113760 O01¢es 010 MOVB Ponta ,RPC (RO) i cr 

302 034742 013737 O01 1234 MOV TA‘ PT ADDRESS TO LOCATION FOR TYPEOUT 
$3909 HKEKEKSKLEFKASKESEKAEKAKFS TRAE KKDERKSHARAEREHREEHREESLERERERREE 

2310 VERIFY THAT EITHER PORT A OR PORT B HAS THE DRIVE 

egi¢ 034750 005760 000012 rst RPDS. (RO) gee I THE SF mosey THROUGH PORT A ” 

5914 756 11 0012 10 MOVE PORTB,RPCS2(RO) *: T 

5915 Osu7e4 O13737 OO 1SSe Boreas MOV PORT PrN ;MO Hf Ones TO LOCATION, FOR TYPEOUT 
5916 034772 760 O00012 TST RPDS1 tho ; GISTER THROUGH P 

$Si7 G3477 001021 BNE 53 FH 

5918 B3¢008 104 ERROR 4 : Ve N NEUTRAL OR SEIZED 

2319 93500e 0001 036552 - IMP 4§ ;BYPASS REST OF TEST 

2g5 113760 001226 000010 : MOVB PORTS, RP + PoCgR CAO) , Ars cr PORT a 

5 4 O1 00 cs 001234 MOV S LOCATION FOR TYPEQUT 
592 2 760 Boda TST RP Os tro GIs TER ZERO THROUGH PORT 8 
8924 1002 BNE atus ads NOT ZERO 

ease 34 (| nb43 conju ZRROR 3 RIVE IN Nf UTRAL AFTER WRITE ATTN BIT 
5927 035036 000137 036552 ee Rect OF TEST 

5929 : ORT B HAS THE DRIVE. VERIFY THAT PORT A HAS PORT REQUEST cer 

2330 ‘PORT B HAS THE DRIVE. VERIFY THAT PORT A HAS PORT REQUEST SET 

5932 o3s5042 2s: 

5933 2 001244 CLR KERR ick AR THE “CH CK E INDICATOR 

5934 nye ereatt 1126 mov (RO) oh he CON OF REDSI 

1 1122 v MESSAGE 

5935 01 : 85 MO as 5.OF ERROR 

2435 Ole? i> 901124 ny es aa T ;:WHA eisrer su SHOULD BE 
5938 137 11 1164 MOV T, STMPO. “MO cpoaTS aR CONTENTS MPO’ 

5939 935102 e737 001164 BIC etc STMPO ; CIF TED BITS 

2ai0 03511 kth 1124 1164 cn , STMPO :C HE BIT 

5942 1 1 11 001174 MOV : COPY " BAD DATA’ 

5943 1 o 001174 IC #71700 aie CLEAR MASKED BITS 

equa 1 1174 001124 IS $THPH, $GoDAT :*OR’ WITH GOOD DATA FOR TYPEOUT 

5945 035142 104010 RROR REPORT THE ER 

5946 035144 137 001244 COM eReRR :SET THE REGISTER COMPARE ERROR INDICATOR 
5947 035150 40 64S: NOP 

5948 035152 013737 OO1226 001236 MOV PORTB, SEIZPT ;ADDRESS FOR ERROR MESSAGE 


ESRIEB Pit "BucnOve77 Taree FOCTONE) Oo NOW Te or CeTSe BY RTTING ATTENTION BIT SEG O110 


O4-NOV-77 1 
035160 013737 001224 001240 MOV PORTA, OPPRT ;SAME AS ABOVE 
350 ;RELEASE THE DRIVE FROM PORT B 
1 113 001226 o00010 MOVB PORT RPCS2(RO) T PORT 8 
p3e195 313589 001226 001234 MOV POR a BTNBA hove “Boat ADDRESS TO LOCATION FOR TYPEOUT 
035202 012760 000013 o00000 MOV #13,RPCS1(RO)’ SSUE RELEASE THROUGH PORT B 


; VERIFY THAT ORIVE IS SEIZED BY PORT A WHEN RELEASED BY PORT B 


PP P0000 .0.0-0 0.00 





9 
336 
gea 
359 001 CLR RR AR’ ERROR’ INDICATOR 
360 Bi e737 $30 01124 MOV PACT ¢ trcnen SON CONSTANT 

1 127 le OOllee MOV SS’ INCRE 
cs 1375 BBLZES congo §—sbte «BATE APCsacnoy nc te 
5964 bi 1 Sy poo osG MOV BrNBR se TO LOCATION oF OR TYPEOUT 
2365 016037 oree6 LiG4 MOV ct) Bey iF ao po GISTER FROM POR 
537 bi 1366 ae mov PORTE ETN iio Es 19 9 LocaT ION FOR TYPEOUT 
5969 1 ' BEQ bbs . ; Hy a Us EROR PORT 8 B ZERO 
2370 7 ? 001164 st $THPO TA 
297¢ PEROR 44 ; is NOT seize, BY PORT A 
597 13737 0014 4 0014 66S: MOV $1 » $8008T i CHECK. stat BTUs abRon 
5974 1 12 1234 MOV ORT NBR ADORESS FOR TYPEOUT 
2375 it 001124 001126 che SGDORT, SBDDAT Sona WITH CONSTANT 
2959 1 go> ERROR 27 BE PORT REGISTER ERROR 
2378 oo0240 678: NOP 
3380 ;RELEASE THE DRIVE FROM PORT A 
5 035342 7 MOV PORTA, RPC (RO) T PORT A 
5983 035 b13939 051854 aes mye PORTA move ORT ADDRESS TO LOCATION FOR TYPEOUT 
2384 035356 012760 000013 000000 MOV #13, TRPCST TROD ; ISSUE RELEASE THROUGH PORT A 
2286 VERIFY THAT THE DRIVE IS IN NEUTRAL 
59898 4 005037 001250 CLR RELERR CL BR THE LEASE ERROR ’ INDICATOR 
5969 936370 Olers7 GO00|2 ooli22 Rov BRP iON 1 He ADORE BF RPDSL FOR TYPEOUT 
BG TOE Ge eu, BE, Beni gist ests txeran 
ce fee Ge Bite BE || RY’ Brastans spre (Ber Ny Gabe. graye rectsten ron ror a 
2330 35 Os 737 r 1 64 BIC, Ponte xbtoe Ro. Sete a ts oe BITS FROM THE COPY 
2ga9 1 I ti 2e MOV [thO} 381 3; + THe I STATUS REGISTER FROM PORT B. 
2238 1 3 il 1166 MOV STMP3, STMP1 :COPY IT INTO ’$TMP1’ 
ube 27 100106 00116 BIC BATA! VV, STMPL iC EAR PORT NDENT BITS FROM THE COPY 
6000 47 3737 001164 OO116 cne STMPO, StHP1 TS THE wate REGISTER THE SAME FROM BOTH PORTS ” 
£002 035500 5737 001164 Tst $tnP0 Ble ARE THE SAME: ARE THEY ZERO ” 
6004 O35506 104046 ERROR 46 :REPORT DRIVE NOT IN NEUTRAL OR NOT SEIZED 
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CZRJEB.P11 O4-NOV-77 13:27 127 TEST SEIZE BY WRITING ATTENTION BIT SEG D111 
6005 035510 000137 035674 _ JHe 72s . :BY PASS THE REST OF T HE ¢ HECKS edt Gite 
D0 DO $ 7 
aeiebd Bt 3 OC 1328 BB 1456 Vv ORT » BERRA late corte EST SHOWS DRIVE NOT if SE UTRAL 
6008 01226 000010 MOVE PORTB,RPCS2(RO) ; PORT 8. 
6003 034 001164 TST ST : F stat EQ 0 FROM PORT A. 
6011 44 0137 0012 001234 MOV TA, PT :SEIZI PORT IF SHOWS DRIVE NOT IN NEUTRAL 
pois i370 Sollse Bolte POV, SYNRa, BEODAT,. BAD ATA: FOR ERROR TYPE OUT 
BO14 735 001166 ret Sin" E oe) TATUS EQ ZERO FROM PORT 2B. 
6018 74 012737 177777 1 69S: MOV 8-1, REL Peg REL ERROR’ INDICATOR 
ete 1 i 14 v si - 1( RB } : eEpte “DRIVE 
6019 ERROR 'T 
e020 $3238 bo3959 001170 001126 70S: MO wee, SBDDAT Tbe WBE’ ERROR BIT Te RT tRES S WHEN RPDS! READ 
3737 goles O01e MOV TA: PTNBR ; PORT NUMBER 
cose Qe 0011 001170 CMP t.s *ALL BITS OK 
602 42 140 BEQ ;BR IF OK FROM PORT A 
6024 44 k RROR PORT 
6025 4 1 001172 901126 71S: nov STNP3, qa CHECK 1 FOR BIT FAILURES - FROM PORT B. 
es ts 
bos? O3sbe3 003737 O11 901172 che ale SEE ei per BERN PORT 8. 
6029 035672 104007 ERROR i REPORT ERROR 
74 728: NOP 
e038) B32e32 9 036552 IMP 4$ 
6033 5 , ASRASSFSAASKA REALE KAALEALLAALALSAAELERHLALALAALALALALAASLAKAAE LEEKS 
6034 : THE ORIVE IS SEIZED BY PORT A. VERIFY THAT PORT B HAS PORT REQUEST SET 
60 7 38: 
£535 35708 At 760 901224 o00010 MOvVB TA, RPC (nO) SEL OR "abon 
6038 71 137 001224 001234 MOV ORTA, PT nove, oe aboRESS oJ? LOCATION FOR TYPEOUT 
6039 216 G05037 001594 a cLR an CH Fees) INDICATOR 
6040 segs ae 
6041 0357 1 00018 88} 138 MOV Si cng. $a0087 FORN iether SF BeOS! ERROR MESSAGE 
P64 § bas rae peoos? ae 55 001124 HOY Hopr: orvi Wy, ree GMAT REGIST TER SHOULD BE 
6044 013737 001126 001164 MOV i ; rene CONTENTS TO *STHPO 
cove fueron Berar Abita BBLS ens ae? |B 
764 1124 601164 , STMPO ; heb 
6047 035772 001414 BEQ ;BR_ IF OK 
604 035774 013737 901126 1174 MOV 1, $64 :COPY ’ DATA’ 
604 1 1174 BIC 1700; $TMPY : CLEAR MASKED BITS 
6050 036010 053737 001174 001124 BIS STHPas $GDDAT :*OR’ WITH GOOD DATA FOR TYPEOUT 
6051 9 104010 ERROR +5 ; REPORT THE ERR 
b05¢ 0360 poesia 001244 ont con CKERR :SET THE REGISTER COMPARE ERROR INDICATOR 
6054 0360 1 001224 1236 : MOV PORTA, S 1zpT ;ADDRESS FOR ERROR MESSAGE 
b055 036034 013737 OOlece 661548 MOV PORTB:O :SAME AS ABOVE 
a ;RELEASE THE DRIVE FROM PORT A 


60 
6053 oO3604e 413769 poigey 8 0010 MOVB PORTA,RPCSe(RO) ;SELECT PORT A 
o 0137 lee4 1234 MOV PORTA;PTNBR ;MOVE PORT ADDRESS TO LOCATION FOR TYPEOUT 


OF 
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036056 012760 000013 Oo00000 MOV #13,RPCS1(RO) ; ISSUE RELEASE THROUGH PORT A 
; VERIFY THAT ORIVE IS SEIZED BY PORT B WHEN RELEASED BY PORT A 






036064 001250 CLR C EAR ’ ERROR INDICATOR 
oie 001 124 MOV OMPARTSON CONSTANT 
ee . 

Bias ue Cee ne SSoHREES FON vrcout 
peti? 1 a Tea4 MOV Q LOCATION. Fo FOR TYPEOUT 
O3b1e4 0 I 001164 MOV p Lae Gist FROM POR 
036196 1 4 O01234 mov pr ; : Es TO ae FOR TYPEOUT 
036154 Q 2ss fe Pst ra Pont A aeRO 
fetes Sore; US" oie 

164 ERROR 44 :Be RIVE VE NOT SEIZED BY PORT B 

166 9011 4 001126 75S: MOV $7 ‘$ T ‘Check - A i FROM PORT B 

174 12 001234 MOV One ORR screenees POs ADDRESS FOR TYPEOUT 

02 0011e4 OO01i26 cn SGDDAT, SBODAT : COMP: WITH CONSTANT 
O3ee e519 ERROR 2 jee REGISTER ERROR 

14 76S: NOP 

;RELEASE THE ORIVE FROM PORT B 

036216 12 000010 MOVB PORTB,RPCS2(RO) ; T PORT B 
036224 oOtS 001234 MOV POR TBsPINER Dhove PORT ADDRESS TO LOCATION FOR TYPEOUT 
036232 o00di3 9o00000 MOV #13,RPCS1(RO)’ ; ISSUE RELEASE THROUGH PORT B 


;VERIFY THAT THE DRIVE IS IN NEUTRAL 





036240 37 001 CLR LEAR THE ’RELEASE ERROR ’ INDICATOR 
036244 18737 900012 001122 MOV HFoRR THe OF RPDS1 FOR TYPEOUT 
papSee 286 Oie737 11206 001124 Rov H geragy ae Sei phe CONSTANT 

2 bi l2 Sareea MOV RPoSi RO} TMP2 ; eet Tne’ OF IVE. ST STATUS REGISTER FROM PORT A. 
636300 013737 001170 001164 MOV STMP2,S$ 5 COPY NTO 

306 0427 1001 1164 BIC #ATA! VV, STMPO Ba PORT NOENT BITS FROM THE COPY 
036314 13760 1226 000010 MOVB PORTB RPCSe( RO) iCtre 
036368 160 ie 001172 MOV pepsi {RO} T™MP3 :GE “tte Or Baty STATUS REGISTER FROM PORT 8. 
13737 1172 001166 MOV STMP3, STMP1 : COPY NTO 

036336 042737 100100 001166 BIC BATA'VV.STMP1 CLEAR hr PORT DE NOENT BITS FROM THE COPY 
036344 023737 001164 001166 CMP STMPO, STMP1 ;1S THE Oe TUS REGISTER THE SAME FROM BOTH PORTS ? 
036352 001 BNE 77$ F NOT 
6 354 005737 001164 S SIMPO ; :REG TERS ARE THE SAME: ARE THEY ZERO ” 
036369 * 1 ERROR 46 * REPORT ORIVE NOT IN NEUTRAL OR NOT SEIZED 
036368 1 036550 IMP gifs BY Ss THE REST OF THE CHECKS 
0363 013737 001170 001126 77S: MOV ooa AT SET POSSI m3 BAD DATA FOR ERROR MESSAGE 
036376 013737 001226 001234 MOV rat SEI ZING PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 
036404 113760 OOlec6 O00010 MOVB PORT RPCee (RO) s LECT PORT B 
036412 0605737 OO1164 TST STM SEE IF STATUS EQ O FROM PORT A. 
OZ64i€ OO14i4 BEG ss ‘BR IF ZERO 
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ON Ow 


Oh be = Be Bs be be eb Be he be Be be ee he ee oe 
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Pil O4-NOV-77 13:27 127 TEST SEIZE BY a WRITING ATTENTION BIT SEG 0113 
4 91 737 001224 1234 MOV PORTA, PTNBR ; SEIZING PORT IF TEST SHOWS oDRive NOT IN NEUTRAL 
4 a1 ? BOIL 2 26 MOV sine, , SB00AT : FOR ERROR TYPE 0 
4 113760 901224 10 MOVB ORTA;RPCS2(RO) ; L PORT o 
4 73 001166 rst : F TATUS EQ ZERO FROM PORT B. 
1 os 77777 001250 78S: MOV #-1,RELERR ; FEL ASE ERROR’ INDICATOR 
1 11 000000 MOV #11; RPCS1(RO) + aE an DRIVE 
036464 000013 000000 MOV #13; RPCS1(RO) i RELE HE ORI VE 
472 ERROR :T SSAGE 2 
4 1 001170 OO1126 79S: MOV MP  $8008T tee OR Frat FAILURES WHEN RPDS! READ 
036 1 001224 001234 MOV ORT NBR PORT 
1 737 OO112e4 001170 CMP $GDDAt , STMP2 ; L Bits TS OK 
14 BEQ ;BR I FROM PORT A. 
ERROR ; PORTE 
1 3 001172 001126 80S: MOV TMP3, AT ; CHECK post FOR BIT FAILURES - FROM PORT B. 
137 001226 001234 MOV ORTB'PTNBR :C NUMBER 
036536 023737 001124 001172 CMP SGDDAT, STNPS i SEE IF READ OK OK FROM PORT B. 
44 1401 BEQ 1 :BR IF OK 
036546 104007 ERROR 7? :REPORT ERROR 
036550 o00240 81S: NOP 
036552 000004 4§: SCOPE ;LOOP ? 
5 Teer aD TEST NO SELZE WHEN OD” URITIEN INTO ATTENTION BIT 
; ATE TEST NO SEIZE WHEN 'O’ WRITTEN INTO ATTENTION BIT 
fAVERIFY_ THAT TATHE DRIVE Is NOT SEIZED WHEN A ’ZERO’ IS WRITTEN INTO 
i *S ATTENTION BIT. 
:# A. SELECT A DRIVE NOT BEING TESTED AND WRITE ALL BITS, EXCEPT THE 
# BIT OF THE DRIVE BEING TESTED, INTO THE ATTENTION REGISTER. 
% 8. VERIFY THAT THE DRIVE IS STILL IN NEUTRAL. 
ssu jigesettteeeeeeeneneneennenseeeeenenenanaanensneneeneeeenenanenes 
554 005737 001274 TST KYBCTL ; PERFORMING ONLY SINGLE TESTS ? 
560 001406 BEQ 2s :BR IF NOT 
036562 1 BPL I$ :BR_IF JUST NTERED TEST 
036564 0001 092602 IMP EXE ;RETURN & GE NEXT TEST NUMBER 
036570 018737 gg1274 1S: MOV si, KYBCTL t 7 SENGL TEST INDICATOR 
036576 112737 600030 1102 2: MOVB STSTNA R 
016737 O366e6 001106 MOV a ih : Hes Ue LOOP ON r ST ADDRESS 
beets 127 001110 MOV PERF 3C ERROR ADDRESS 
036620 012737 007640 001176 MOV ::D0 4 TIONS 
0 012706 001100 TEST30: MOV ‘ZoaD HE S AER POINTER 
; CLEAR poi BITS FOR BOTH PORTS 
036632 113760 001224 000010 MOVB PORTA RPCS2(RO) SELECT, PORT cee 
Oseeus 612760 Bopp TT oo00c0 abu a1, arcs 1(RO) 
Bee 012760 600013 o000 MOV #13: RPCS1(RO) ELEA Ee oh DRIVE 
0 113760 001226 0010 MOVB PORTE ReCSe(RO) sREL cr PORT 
036666 005060 O000Ie CLR RPOS1 (RO) :SEI He ORIVE THROUGH PORT *B° 
0326672 012760 000011 oD0000 MOV il, RPCS1 (ROD : ISSUE DRIVE CLEAR 
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30( 1046) _O4-NOV-77 y4y* PAGE 114 
T30 TEST NO SEIZE N ’O’ WRITTEN INTO ATTENTION BIT SEG 9114 


000000 MOV 813,RPCS1(RO) ;RELE THE ORIVE 
000010 MOVB PORTC,RPCS2(RO) ;SELECT DRIVE NOT BEING TESTED 


3p, aE aE EAE SE a ab a a a a aa a a aa naa aaa aa aaa 
;WRITE ALL ATTENTION BITS EXCEPT BIT FOR DRIVE UNDER TEST 


001164 MOV asR STMPO ; STORE ATTN iy FOR PORT A 
3} ,RPAS(RO) iWRITE THE ATTN REGISTER 

ss RAAAAEASSSAEASHSRSKEARSRRASERAERSRAARRARRARASRARRRSRARE RRR RAE EE 

: VERIFY THAT DRIVE REMAINDED IN NEUTRAL 


; VERIFY THAT THE DRIVE IS IN NEUTRAL 


001122 Sov af Sere eet oe YPEOUT 


ADD RO ADD T i ss 
BoodT0 a eBay Set 5 omnes 
901170 nov Toes Stnas 2 ier he DR oo Steeo® REGISTER FROM PORT A. 
bi6e BIC seTarwy THO 7C Ee Pea NDENT BITS FROM THE COPY 
001172 MOV RPOSi (HO) ,STHPS Set The Dat “STATUS REGISTER FROM PORT B. 
DOL lee Bre site Fle: 1 EOE ae PORT Ser NOEHT BITS FROM THE COPY 
001166 cne THPO, StHP Hs THE STAT REGISTER THE SAME FROM BOTH PORTS ” 
Tet THPO eo na ARE THE SAME: ARE THEY ZERO ? 
RROR 4 ‘BE 1 OF NOT LIN NEUTRAL OR NOT SEIZED 
MP ; BYPASS ST THE CHECKS 
001126 64S: MOV : MP2, T : SET 1 DATA FOR ERROR MESSAGE 
1234 MOV ORT :BENBR : IZING Peer SHOWS DRIVE NOT IN NEUTRAL 
“ ne | Uhh tae ir coATUS EO O FROM PORT A 
BEQ : RO , 
001234 MOV B38 ta, PTNBR ; 1eINe PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 
001126 MOV THP 3, SBODAT :? TA’ FOR ERROR TYPE OUT 
000010 MOVB TA;RPCS2(RO) ; LEC PORT A. 
TST STHPI SEE F Status EQ ZERO FROM PORT B. 
001250 655: one #-1,RELERR ee "RELEASE ERROR’ INDICATOR 
000000 MOV #11°RPCS1(RO) CLEAR DRIVE 
000000 HOV #13’) RPCS1(RO) REL "Pinos nesenc : 
001126 66S: nov Stnre, DAT i LOOK OR BIT BILURES WHEN RPOS1 READ 
001170 che sapont, sTHP2 ee OK oes P 
ERROR 7 *REPORT ERROR 
001126 67S: MOV STMP3, DAT + CHECK REDS1 FOR BIT FAILURES - FROM PORT B. 
0012 MOV ORT 50RR ‘CHANGE PORT NUMBE 
001172 CMP SGDDAT, STMP3 :SEE IF READ OK FROM PORT B. 


ESTER Pid GUND UCT? Taree) COCTONE? ,OR-NOV~ te ST NO SEIZE HIMEN 0” WRITTEN INTO ATTENTION BIT SEO O115 
£553 37eue 1p40g? = ERROR ges : REPORT ERROR 
B33Sue BS0605 me: OeOPE ;LOOP ? 


g s SRESLERESASSKSSASRASRAKRSSSRASKSKSKHSRERSRSRERERRASRRAEARAAKSALEKE 
j ATEST T 31 TEST PORT 'A’ TIMEOUT DOES NOT RESET DRIVE 


i EVERIFY THAT PORT TIMEOUT DOES NOT INITIALIZE THE DRIVE. 


Aofoforororurofufurororone 
DEIR Loto 


C. WAIT FOR THE DRIVE TO Ue UP eh Por THAT THE ORIVE ay a TO 
TH POR s See 1°S IN THE E REGISTER. 


at ; A. SEIZE THE ORIVE THROUGH PORT ’A’ BY WRITING 0O’S INTO RPDS1. 
esis ;# B. WRITE 1°S INTO RPERI THROUGH PORT ’A’. 


eo 


DoRT BH THAT WD fat pote IS OR PORT ’A’ AND IS NOT SET FOR 


Wreeieiriiiiiitiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiitiitittiittttttttt 
1s: 


Be44 
e548 7250 té13 
be50 7250 737 001274 Ist KYBCTL ; PERFORMING ONLY SINGLE TESTS ” 
e5eo BPL Hee : ar JUST ENT D TEST 
pSe3 Basse BG HOS oole74 1: HOV EEO UNGLE TEST INDICATOR 
6255 037 ii 37 901102 2s: MOVB a3; Stevan ; st N R 
5256 13739 001106 MOV $73 pL ON TEST ADDRESS 
625 7306 o1 3 7 901116 mov sTESTaL. :LOAD LOOP ON ADDRESS 
p5e6 Oso 82 ease tee TEST31: MOV Sete ins. ‘oaD THE STACK POINTER 
6261 ;CLEAR ATTENTION BITS FOR BOTH PORTS 
eses 7326 113760 001224 000010 MOVB PORTA RPCS2(RO) ; cT 7PORT. #8 
beb4 7334 12 CLR wos, IRD) : 
5 7340 Ol if oo0000 MOV 1) ; 
be66 346 O01 1 999000 MOV Ba Br aeSet Ro ee LEA 
354 1268 10 MOVB t : 
626 53ee  BYSoED if 00000 Sov a1 Tie) : Te, om penn Armee Maes 
6270 037374 51560 000013 000000 MOV $15’ RPC > REL DRIV ve 
bs7h :saumnunatmeamsnthshattioskoesalakihetionckebeintasesaemnansan 
e533 ;SEIZE THE DRIVE THROUGH PORT A 
6275 037402 113760 001224 000010 MOVB PORTA, RPC (RO) 5 LECT PORT A 
be76 G37410 013737 go 1ses 001236 nov RepeL CAD) T : ORE SEIZING PORT’S ADDRESS 
6278 Baus pr3989 001226 001240 MOV 8, OPPRT i BPP OST TE PORT ADDRESS 
g s SSSAALAASAASSSRASAASKAAAKAHAAESLESSRAHAAAARARAAELARRALRARRRRARERSARSE 
gi ‘FORCE AN ERROR 
bee: 037430 012760 177777 o00c014 MOV #-1,RPERI(RO)  ;SET ERROR BITS 


JEB-Pal” ucnOve77 fasae) TONS) BT NOV Teer DéRt “A” FIMEGUT DOES NOT RESET ORIVE SEG 0116 


H SHREERERDRERS ELE EE RRREERREREER SHR SHERELAERERLAARERESREEELEZEE RO DER 
:START THE TIMER 
74 7 CLR ME COUNTER 
Berns Bier 37 oo1z64 Rov, seo. waren SEF uate FO" 2000 AS 
ll 730 le 0 VB RO) Lect 
0374S6 01373 O0iee& 001234 MOV PORTB, PTNBR ;MOVE POR T ADORESS TO LOCATION FOR TYPEOUT 


5 on cr a ee 
:WAIT FOR DRIVE TO TIMEOUT 


000012 18: TST RPDS1 (RO) IT FOR T TO BE RELEASED 
1372 0012S4 FGF _— BR UF Of ve see pertnéed 
Tosa ; R 5e Bate NOT RELEASED WITHIN 2 SECONDS 


MOVB PORTA, RPC "a T TA 
MOV PORTA, PT nove *BORT ADRESS TO LOCATION FOR TYPEOUT 


he ERROR BIT (ERR) IN RPUSL GOULD STILL EE are 
‘tue ERROR BIT (’ERR’) IN RPOSI SHOULD STILL BE SET 


ot 
ae 
ES 
25 


SCCCenaaaanananans = 


2 
-—— ue 
os 
888 8888 88 


sCLERS THE °C eres INDICATOR 
r. T cOnTENT 


3F REGIST SRESS oF ERROR MESSAGE 
: RH Ss 
; WHAT G 


ire Bo “a TO *STMPO’ 


te: 


fGtowewimow 
ee ee 
ONOU £WwlE-O 


go 
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8 
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Hee eee ee 
eed ool ocd ocd el et 
P22 CSTP VR 





BRO 
SLEOR THE ene aS 
R371 0011 ir an | My OR TYPEOUT 
037620 001244 ;SET THE REGISTER COMPARE ERROR INDICATOR 
037624 66S: 


5g, He a aE ae a a aE ae a a a a a a a a a a aa a aaa aa aa aaa a aa aa aaa 
i tHE HE ERROR REGISTER SHOULD CONTAIN 1’S 


037626 cLR CKERR ;CLEAR THE 'CHECK ERROR’ INDICATOR 
001126 v RI (RO? SBDDAT’ T CONTENTS OF RPERI 
40 001122 nov :Fokm REGISTER $ OF ERROR MESSAGE 
RO ; 11 BASE S 
Se 001124 MOV 8177777, SGDDAT ;WHAT REGISTER SHOULD BE 
37, 001124 O01126 CHP SgDDAT, SB0DAT : Is THE opeGISTER OK ? 

0376 10401 RROR 0 j REPORT THE ERRO 
03767 137 001244 OM KERR :SET THE REGISTER COMPARE ERROR INDICATOR 
037676 O00240 68S: NOP 


SRRUER SRDS DONC Re 


- SEeeeeSSSLLLSES SALLE SELLER REALE RLLAARAAAARARAARAE REESE ES 
: tHE ATTENTION BIT FOR PORT A SHOULD STILL BE SET 


roo 
yee 
a8 
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DL CTRLR LGC  MACYLI 30(1046) -“NOV-77 17:4 117 
eer Tee biG BNoNOv-77 se? rat TEST bat | OE htour DOES NOT RESET DRIVE SEG O117 
“ CLR CK reo INDICATOR 
Bat iss MOV 8+ ERROR MESSAGE 
nee BBY 
1164 MOV TENTS TO ’STMPO’ 
1164 BIC A eits 
1164 cne T i sits 
B01 17% ay M tity DATA’ 
LL) 
001124 Bis STMP4 , SGDDAT SEE OR Ti Go00 DATA Por TYPEOUT 
RROR 41 TYPE 4 
4 COM CKERR :SET T sePeist R COMPARE ERROR INDICATOR 
S 70S: NOP 
s3 SESSSESSSSSASSESSRSSESSEAR ESSE ERASERS ERASER AA ELRSELEARAEAEAE 
6360 ;VERIFY THAT THE DRIVE IS IN NEUTRAL 
p32 1 CLR AR THE ’ She Regst F , iNO CATOR 
V weer? YPEOUT 
e3ee i nOV ; Constant 
268 MOVB »”; = 
636 MOV 2; my ia TATUS REGISTER FROM PORT A. 
6368 1 MOV ST ; 
6369 : BIC eho) ; NDENT BITS FROM THE COPY 
aa - HOV BP ath) $7 3; tie d Stret® REGISTER FROM PORT 8B. 
1 BIC BATAIVV,STMP1 ;CLEAR te BITs FROM THE COPY 
1164 CMP $1 , StMP : THE ST TAT Otek THE SAME F BOTH PORTS ” 
5378 001164 TS sfpPo ; Ae ARE THE SAME: ARE THEY ZERO ” 
5378 ERROR : 1 be NOT ob” meats OR NOT SEIZED 
34 IMP 76S + BYPAS CHECKS 
6380 1170 1126 728: MOV STMP. » $B0DAT :SET BAQ DATA OR ERROR MESSAGE 
638 12 1234 MOV PORTB, NBR ; tear T SHOWS DRIVE NOT IN NEUTRAL 
e382 le 10 MOVB PORTB,RPCS2(RO) ; 
6383 1164 ToT $1 H ri ufo O FROM PORT A. 
b3a¢ 001 1234 MOV porra, PT H ING PORT IF_TES oDRIVE NOT IN NEUTRAL 
oe Bie Bis = te Rae: aod HOY lla 
6 001166 rst sini : if F Le. EQ ZERO FROM PORT B. 
77777 001250 73S: mov o-1 RELERR, ; as ERROR’ INDICATOR 
6 p00013 990500 HOV #13; RPCS1(RO) Aa 
6394 901170 001 12 74S: HOV Pony » $B008T erated WHEN RPDS1 READ 
6396 100000 001170 BIC a, $TMP2 Posen one ey THE MOE ATTN BIT 





CERIEE- but” pt CTRSS q-27 13: 79533" — T eK fest PORT he Frngour DOES NOT RESET DRIVE SEG 0118 
6397 i 001124 001170 CMP ‘al , STMP2 rier “Easc es ? PORT A. 
































ips 
£398 ERROR ips 
6 i 117, ae 75S: thai H T FAILURES - FROM PORT B. 
6 7 pt at sate ; . ah oe 
& ; f 11 B81 38 Bro STMP3 : T B. 
6 OR a ; olar OE RROR 
a i8s880 res: ROP 
6408 - SESRESSSSSSSSSSSSSSSSSSRSASSSSESSSSAEASSASERRERRRRRKRRRARAERESE 
B403 tHe ATTENTION BIT FOR PORT 8 SHOULD NOT BE SET 
641 MOVB »RPCS2(RO) T 
baie Beeaas MOV et sgl hove BAS rete TO_LOCATION FOR TYPEOUT 
6413 04035 CLR mee ERROR’ INDICATOR 
6414 Vv 20 BRAT neGis} My 
puis MOV ; 2 POF OTER ERROR MESSAGE 
eyi$ eR . ' y Fe 
ay “a MO ‘Ae M : NTS TO ’STMPO’ 
64 ats ais “o T a eae 
6421 O40 BEQ ‘ ;6R IF 
b4s5 | OME Be 2Ot«TR Stay: Be Bo 
b4 tala BIS S1NP4, ScDOAT Tone pik: Sy FoR TYPEOUT 
64 D4O4Se 008137 001244 COM CKERR :SET T GISTER COMPARE ERROR INDICATOR 
bie? O45E 778: NOP 
pics ;CLEAR ATTENTION BIT FOR PORT A 
6431 O4O460 11 001224 000010 MOVB PORTA, Rio) : 
64 Dues D000 12 CLR Reds TR ; ive 
Se i2768 80311 opon09 Roy Si vApcst cna | Pe ie 
b435 BuDebe 04 3S: SCOPE iL 
6437 : eee e eee eer H SORT RB’ TIMEOUT DOES NOT RESET DRIVE 
6438 j ATE TEST PORT ’B’ TIMEOUT DOES NOT RESET DRIVE 
B40 lenny THAT PORT TIMEOUT DOES NOT INITIALIZE THE DRIVE. 
eae i A. SEIZE THE DRIVE THROUGH PORT ’B’ BY WRITING 0’S INTO RPDS1. 
re i# B. WRITE 1°S INTO RPERI THROUGH PORT ’B’. 
CMME :# C. WAIT FOR THE ORI TO Me our, ESR PoRT THAT THE DRIVE RETURNED TO 
6447 : NEUTRAL; THAT aty NTTON IS NOT SET FOR 
e448 i# , AND THA "See 1°S IN THE ERROR REGISTER. 
6450 H + SLSSSSSSKASLHSRKASSSSLAASSAKSESESKLSRSSAERSSRRAAKARARSRRSS RARE 
6451 o405 $6732: 


id 
64Se O405i0 005737 001274 TST KYBCTL ;PERFORMING ONLY SINGLE TESTS ” 


C2RJEBO, DL CTRLR LGC MACY11 30(1046) O4-NOV-77 17:4 ue ' 133 
CZRJEB.P11 O4-NOV-77 13:27 T32 TEST PORT 'B’ TIMEOUT vv NOT ad DRIVE SEG 0119 


= 040514 001406 BEQ *; 


a oe: Beem, SoReal 
fs bie i nd sits itGep (B96 Ge Tey, Azores. 
eued upesy Bis7a7 BR00RS OO1I7e vecrae: MOV BSTACK. tee all 


SOO 
5OOE 





b463 ;CLEAR ATTENTION BITS FOR BOTH PORTS 
00001 MOV a, (RO) ; 
eibe puosee ; ts) eon te ee RO Are Ee 
6 Bue De 1 853008 v : 3) ; VE 
b469 4 10 MOVB S2(RO) ; 
are : ineanl CLR oy iB, i ; IVE THROUGH PORT ’B’ 
647 1 H00000 MOV F ( ; H VE 
ae 5S 8 8 8 a an a a a a a a gg a a a aa 
b476 ;SEIZE THE DRIVE THROUGH PORT B 


e478 BuGeso 013737 138 801246 a Bettas Saliiat Rat BoRT'S ADDRESS 


1 
6480 O40662 013737 OOlee4 001240 ;’OPPOSITE’ PORT ADDRESS 


6481 
4 Fa eaenen teatenmueeninalenneimameanimmenaaeatal 
eas ‘FORCE AN ERROR 
b4eS 040670 012760 177777 000014 MOV #-1,RPER1(RO) ;SET ERROR BITS 
4 Ts oe ‘aarti eaaaianiniaacnimaa tat iia: 
ae TART THE TIMER 
64390 04067 001 T AR THE TIME COUNTER 
e4a1 Buosoe Biers? 00780 poiasy ee S58. 1Steo, ‘oR Hey Bolt e000 
64 716 1137 9012 10 vB & RO) Lect POR 
p33 040716 613737 O0122e4 001234 PORTA nat} ; MOVE T ADDRESS TO LOCATION FOR TYPEOUT 
6495 3 scseuguessstesreserseaneeeesutensnnecesnunssnssessonsssssensees 
b496 hart FOR DRIVE TO TIMEOUT 
64 7 7 000012 1S: TST RPDS1 (RO) sWATT THE TO BE RELEASED 
o O28 oe i PD ee 
oci2s4 S TCH :waTcH 
650 36 1372 BNE 1$ IF NOT 
6 O74 36 os OR IVE NOT RELEASED WITHIN 2 SECONDS 
203 mas 137 001 000010 x MOvB PORT BPC (RO) T PORT 
6 a 13937 Boise. odo1e34 MOV PORTE: PTNE rod FE ADDRESS TO LOCATION FOR TYPEOUT 
6507 5 A SLE ht A TE OO ALLE ENO ITE NE 


6508 tHE ERROR BIT (’ERR’) IN RPDS! SHOULD STILL BE SET 


CZRJEBO, DL CTRLR LGC MACY11 30(1046) O4-NOV-77 17:48 enet 120 
CZ2RJEB. et O4-NOV-77 13:27 T32 TEST PORT ’'B’ TIMEOUT DOES NOT RESET DRIVE SEG 0120 


Bele glares Gren Suis Bf aon EE 
BRPOS | , SBF TER. 
ue 





OF ERROR MESSAGE 


001126 

: 001122 BB oe 

1 1 901124 v oo: 

1 191 001164 v MPO ; T NTS TO ’STMPO’ 
651 1 001164 BIC ; 
651 1 37 1124 001164 CMP MPO : 
651 1 414 ae 
651 1 1 0011 1174 v : 
6 1 Os 1174 C ia ASKED BITS 
b 1 7 il 1124 Son 23 PY aah a A FOR TYPEOUT 
poe: 1 00513 001244 COM KERR are T GIs zr COMPARE ERROR INDICATOR 
6 1064 fe) 66S: NOP 
6 g ttt t 555 ts Shit ttt ts teh toll told -deh-t-t-beleid-b-talehalalalalabeieleieiateiaieiaiaiciaieisiaieieieiell 
6 tHE ERROR REGISTER SHOULD CONTAIN 1’°S 
p2esg ;CLEAR THE ’CHECK ERROR’ INDICATOR 
6530 T’ T CONT NT RPER Ri 
6 FORM REGISTER a ERROR MESSAGE 
p235 sere 


eens = 





a ee ee 
tO) 
St 
Bagrogee 
rok} 
848998 
= — 
=e 
VIVE 
BS 88 
be | eel aaeel 
—— me 
By eR 
OOmMsaoaer 
©ov<coO<<D 










6536 010 ; anor 

6537 Bs 3¢ 137 001244 OM i aaeM THE HE GS? R COMPARE ERROR INDICATOR 

6 238 000240 68S: NOP 

6540 ; - SHESSRESEEEEEEEEEEESEE ESSERE EASELS SSRHEEHERAERALSHE DG HAAR AEEE 

6 41 : tHe ATTENTION BIT FOR PORT B SHOULD STILL BE SET 

6543 1140 CLR *CLEAR THE ’CHECK ERROR’ INDICATOR 

6544 041144 1 001126 MOV eee CONTENT 

6 4S 1158 0011 MOV RE STER 35. ERROR MESSAGE 

peus 1164 O1 1124 AOY } 2 

6548 117 1 1164 MOV ¢ TENTS TO ’STMPO’ 

6549 1 37 1164 Bl A Ie 8 

6550 1 1124 1164 T 3¢ THE BITS 

6551 1214 1414 BEQ :BR_IF 

65 1216 0137 901174 MOV T, STMP4 i COBY "BAD DA 

65 1 7 901174 BIC A, StTMPY ; LE@R TH E RASKED e175 

aa] 1 1174 001124 IS STMP4 , SGDDAT ;'OR’ WIT A FOR TYPEOUT 

6555 04124 0404) ERROR 4 i TYPE | seace 4 

6 26 Out 137 001244 OM CKERR :SET T STER COMPARE ERROR INDICATOR 
1 40 70$: NOP 

4 

peP0 ss SEEKSERAAKEESASSERSSSERSAAALSSAASSRRSKRSRAELALELA LEAR RALAARAREAE 


; VERIFY THAT THE DRIVE IS IN NEUTRAL 
6564 41250 005037 O012e50 CLR RELERR ;CLEAR THE "RELEASE ERROR * INDICATOR 


os 
Be 


CZRI OL CTRLR LGC 1 30( 1046) -NOV-77. 17:4 
ESRIEB. Pil O4-NOV=77 77 13: ngc34 132 TEST Pant f at DOES NOT RESET DRIVE SEG 0121 
6565 041254 012737 001122 nov ;FORM_ THE ADDRESS OF RPDS1 FOR TYPEOUT 









ell ERILURES WHEN RPOS1 READ 
: meee ATTN BIT 


1 PORT A. 


a RURBER FAILURES - FROM PORT B. 
‘, at THE ATTN BIT 


qh 
BSBIRRE 


74S: MOV 3 nPe ai 
MOV ORT 
BIC $00 Ste 


? 
75$: MOV TMP3, T 
MOV ORTB’ PINE 


33 


E AD OK FROM PORT B. 
PORT ERROR 


SLSR I NERS 


6 THE I/ ROORESS 
pees igee Ol a not Pad 
‘ L5 : 25 nov : 8 ait S REGISTER FROM PORT A. 
Pest 1316 7 64 BIC } ee BITS FROM THE COPY 
£238 i i Ag Nove : beer TATUS REGISTER FROM PORT B. 
6574 O41 1 a3 MOV 5 He 
6575 i 66 BI ; CLEAR ITS FROM THE COPY 
6 26 ‘ 66 bre THE Sits Rote THE SAME FROM BOTH PORTS 7 
68 1379 S als ARE THE SAME: ARE THEY ZERO ” 
6580 1376 Bf a i REPOR Tg re eee OR NOT SEIZED 
boas O41409 728: MOV sthe » SBODAT grr THE GHECKS ERROR MESSAGE 
6 1 MOV TB, NBR EST SHOWS DRIVE NOT IN NEUTRAL 
eSes : neve aad pone | ae EQ 0 FROM PORT A. 
6 4 BEQ 
6 4 MOV 2 ,P PORT DRIVE NOT IN NEUTRAL 
ese 436 MOV STH 3: 82008 ; ees E R PPE Ot 
b50 ret ity F re nat ATUS EQ@ ZERO FROM PORT B. 
ese 738: MOV 1, RR H ERROR’ INDICATOR 
65 MOV ai, 1¢R9) tar oe 
65 MOV #13, (RO); 
65 ERROR i 
ee } 
ee : 
3 


a te he he be Be ee be Be ne Be ee ee Bn ee ee ee ns ee 


“N 
2n 


Beanneee 


76S: 


6610 g SEAASRSSASASSSAKAASSAAASKAKSESEERAREREARASRRKREREERRERERSREREEEEE 
e512 tHe ATTENTION BIT FOR PORT A SHOULD NOT BE SET 
1 1576 MOVE TA, RPC (RO) T 
peta Og tBos MOV TA, PT hove "Bont ees. Jo. LOCATION FOR TYPEOUT 
6615 Ouible CLR CKERR CL aR T INDICATOR 
6616 1 MOV R (RO) REGISTER” Gro RPDS 
6617 O41 MOV P 1 neh RE STER $5 ERROR MESSAGE 
6618 0416 ADD RO 11 BASE Ss 
6613 041636 CL $cb tere ISTER SHOULD BE 
6620 041642 001164 MOV $BODAT, STMPO :MOVE REGISTER CONTENTS TO ‘STMPO’ 


EERIE Pee "Buen bczz Sgcapt SOCLONE? Oa-NOV~ ToT PORT *B’ TIMEOUT DOES NOT RESET DRIVE SEG Dlze 


6621 041650 042737 001164 BIC scare, g1o ; SAVE SPECIFIED, BITS 
bbee 1656 3737 001124 001164 CMP ; BITS 
be 1664 44 BEQ BR IF 
1 137 1 1174 MOV $8 STMPY ic 
1 1174 BIC OA ities He RASKED 8 
170 ? 1174 1124 BIS sired, $GDDAT i* oe seate’® BaesT Por TYPEOUT 
6628 171 00513 001244 COM CKERR are T CisTeR COMPARE ERROR INDICATOR 
6629 041716 0 77S NOP 
be3 ;CLEAR ATTENTION BIT FOR PORT B 
6633 1720 113760 001226 000010 MOVB PORTB RPCS2(RO) -SELECT PORT #8 
6634 1726 90 le CLR RPoS1t i? THE DRIVE 
6635 1? 12 11 000000 MOV #il, 1¢RO) OR LEAR 
6636 041740 012760 000013 900000 MOV #13; RPCS1(RO) ; RELEASE THE DRIVE 
6637 041746 900004 3S: SCOPE :LOOP ? 
ee 
6640 H itest a3 TEST RELEASE THROUGH PORT A’ UITH ERRORS Ger 
B61 ; ATES TEST RELEASE THROUGH PORT ’A’ WITH ERRORS SET 
6643 ; SVERIFY THAT PERFORMS NO ACTION IF ISSUED WHEN ERROR 
bei i BITS ane “SEF TK Soe ORTVES 
Bb46 i A. SEIZE THE DRIVE THROUGH PORT ’A’ BY WRITING O’S INTO RPDS1. 
bb48 if B. WRITE 1’S INTO RPERI THROUGH PORT ’A’. 
6650 t@ 6. 1S g meter COMMAND THROUGH PORT ’A’. VERIFY THAT THE ’GO’ 
665: i 81 Has RE SET, THAT THE DRIVE HAS NOT RETURNED TO NEUTRAL, AND 
bb5¢ i# HAT HAS NOT BEEN CLEARED. 
b654 is D. CLEAR RPERI BY ISSUING A DRIVE CLEAR COMMAND THROUGH PORT ‘A’. 
6656 :*# 6E. a E ORT 'A’. VERIFY_THAT THE DRIVE 
B65? i AEF URNED FD REUTRAC GND T THA Ge TRER ATTENTION BIT IS SET 
6659 : SRSKKKASKELSKAKSKAKSSSKESRSSSASRKERESASRSERERRRERREREARERERSRRESE 
6660 041750 +733: 
6661 041750 005737 001274 S KYBCTL : PERE MING ONLY SINGLE TESTS ” 
6662 041754 001 es iF ‘ . . 
eeee bai768 01 +35 77 901274 158 inp EXEC, TL Ps PEPE CET res 
6666 041772 113937 600033 001102 2$: MOVB te $7 Ye FNn ; SINGER 
6667 O04 O1 7 001106 MOV 133, 188 8 LOOP ON oN Ray ADDRESS 
£668 os 127 001110 MOV PERF ; OR RODRESS 
bee4 14 0127 640 001176 MOV $t : Te 
6670 042022 012706 001100 TEST33: MOV as ACK? 709,460 THE S TERA POSNTER 
6672 ;CLEAR ATTENTION BITS FOR BOTH PORTS 
74 O42026 113760 001224 co0010 MOVB PORTA, RPCS2(RO) ;SELECT PORT #9 
6675 042034 005060 000012 CLR RPDS1{RO) THE DRIVE 
6676 O42040 012760 00011 oco0000 MOV #11,RPCS1(RO) ISSUE ORIVE CLEAR 
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<-NOV-77 17:4 2 
134 TEST hiv fast indcen PORT ’A’ WITH ERRORS SET 
MOV B13,RPCSI(RO)  ; REL THE ORIVE 
MOVB RPS} S2(RO) ; n pe 8 
CLR tro) ; fe THROUGH PORT ‘8’ 
81 1¢ : AR 
M 1 1¢ *REL VE 
cceneea Ov enennt S Re sg G RELEASE, THE ORTVE, 
;SEIZE THE DRIVE THROUGH PORT A 
Move PORTA, RPC (RO) ECT 
MOV T ist ZING PORT’ S ADDRESS 
CLR $i! 8 T 
MOV ? port ADORESS 


3 -_KESSRSEELEEGERELE LE RESERERRKFRSLEFLE SALA BLE REE RE KEREEKERE REE GED 
:FORCE AN ERROR 


66S: 





MOV 
MOV COMMAND 
CLR K ERROR’ INDICATOR 
MOV SS OF ERROR MESSAGE 
ADD SS 
MOV 9 
MOV ONTENTS TO ’STMPO’ 
BIC S 
CMP 
BEQ 
BIS KED e175 FOR TYPEOUT 
‘SET THE REGISTER COMPARE ERROR INDICATOR 
TST BIT RESET ” 
MOV N 
MOVB au! POR 
MOV sO ADDRESS g TO LOCATION FOR TYPEOUT 
MOV Rich TH PTNGR ELEASE THE DRIVE HROUGH PORT A 
IMP THE RES oa THE TEST 


SAKSAAKRAAASASSSASKERSASKSRSKSLERSKHKSRERKERRERRARARESRHRSREREEERSD 
VERIFY THAT DRIVE IS STILL SEIZED BY PORT A 


1S: 


oye PORTE, BTNBR cmové PORT ADSRESE TO LOCATION FOR TyPEOUT 
CLR CK vELEDR The CHECK ERROR 

MOV S1(RO) SBODAT GET CONTENT 

MOV 8 T ohne REGIST R Ss be ERROR MESSAGE 
ADD RO *;ADO RHI op opRESS. 

CLR $c :WHAT REGIST SHOULD BE 

CMP $GDDAT,SB8DDAT ;IS THE REGISTER OK ? 

BEG b :BR IF OK 


SEG Olz 


3 


—- 


C2RJEBO, DL CTRLR LGC MACYI1 3011046) O4-NOV-77 17:48 PAGE 124 
CZRJEB.P11 O4-NOV-77 13:27 733 TEST RELEASE THROUGH PORT 'A’ WITH ERRORS SET 
6733 042376 104024 ERROR 24 ; TYPE MESSAGE 24 
6734 O4e400 005137 001244 COM CKERR ;SET THE REGISTER COMPARE ERROR INDICATOR 


fe3 arate rcs Qo1g24 900010 66S: 80a = Porta, RPcs2cRO) {SELECT PORT A 

? 14% 613737 001 1234 MOV PORT TA,PT NBR ;MOVE PORT ADDRESS TO LOCATION FOR TyPEOUT 
26 
2 


pe Rie Sieh BARN a 
pate 


V SERS 1 ) SppoAT mets c 
2 nov CeO eel: i “tee Hoke OF ERROR MESSAGE 
MOV yes 7, $GDDAT :A0D Rl 


Ss S Bort 
er ZOO 
674, le737 1 001124 
b243 ae Bbises 001124 001126 CMP $GDOAT, , SBODAT a8 Wye geeisren OK ° 
eoue 5 O red 001244 ERROR ARERR REPORT REGTSTER COMPARE ERROR INDICATOR 
e743 BYSq88 205437 708: ON 
p233 z ln ar an oa ee 
p7et CLEAR THE ERRORS THROUGH PORT A 
b75¢ 042474 012760 000011 900000 MOV #11,RPCS1(RO)  ;ISSUE A DRIVE CLEAR 
Tem 3's SRAAREAKSAKASSAAASKRAARESHAARSRSRASSARAASKAARARAARRARAASKRAARASAAAASSRE 
6738 ;RELEASE THE DRIVE FROM PORT A 
e786 pu2sde 413760 001224 900010 MOVB PORTA, RPCSe (RO) -SELECT PORT A 
67 251 13737 O0l22e4 001234 MOV PORTA’ PTNBR ; MOVE PORT ADDRESS TO LOCATION FOR TYPEOUT 
5760 O0425!6 012760 000013 o00000 MOV #13,RPCS1(RO)’ ;ISSUE RELEASE THROUGH PORT A 
b7be ;VERIFY THAT THE DRIVE IS IN NEUTRAL 


eres Owees0 b12737 BoOoISs coli22 HOV RPDS! ‘FORM THE “RPDS! FOR TYPEGUT 


Pe See POOR BOHN cosy Ya Born ow gba © ft Sonsren 


Bee hea BESWT an Se ae seu 
cree Biseos Yiseeo anise easy Rive Forte Retz et qamehabn vans ao 
Ea ER Gee are Big Be Bee (eae ge wee rn oe 
62776 4se30 ee 001164 001166 CMP STMPO, STMP1 The STATUS REGISTER THE SAME FROM BOTH PORTS * 
5778 ouceio e732 001164 rst THPO Ae rhs ARE THE SAME: ARE THEY ZERO ” 
6780 042646 104046 ~ ERROR 4e. VE NOT IN UTRAL OR NOT SEIZED 

oBS Baseeq 893533 Boii30 001126 728: MOV sthee, s8008T Ger nes cTBCe BA” TREOR: ERROR MESSAGE 
6783 O04 0137 901 34 MOV RB: RP ; ia PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 
67 O4 1137 001 10 MOVB PORT RPC BcRO) ; SELECT PORT B. 
6785 042676 005737 OOii64 TST STNP ;SEE I F satus EQ O FROM PORT A. 
cree Serge POloIs ee Dak iF Sind ; 

13737 001224 001234 MOV PORTA, PTNBR EI ING” S RT IF TEST SHOWS DRIVE NOT IN NEUTRAL 


67e@@ O427i2 013737 001172 O01126 MOV STMP3, SBODAT ;°BAD DATA’ FOR ERROR TYPE OUT 


cSRIEBS sae ose Sve 7 3033! — 33° ect test" RELEASE THROUGH PORT ’A’ WITH ERRORS SET 


C2R Pil O4-NOV-77 13:2 
6789 042720 413760 001224 000010 MOVB PORTA,RPCS2(RO) ;SELECT PORT 
6790 0427 ES 0057 001166 TST sin MP 1 ae 81 oATUS EQ ZERO FROM PORT e. 
6791 0427 101 BNE 
? 734 0127 77777 B50 73S: MOV e-1, iL: Reeere REL er INDICATOR 
67 1 1k MOV ( ae 
6794 1 1 000 MOV 1¢ 
6795 owes ERROR 
£796 1 901170 0011 74S: V thee, T Pear S WHEN RPOS1 READ 
€ 3732 001 3 le MOV ORT R es 
6798 3737 0011 001170 MP ScDoAT, STHP2 = ee 
6799 04 14 1 Q “OK anon PORT A. 
6800 04 ERROR 7 
6801 13737 001172 001126 75S: MOV STMP3, SBDDAT i REPOR TReDS FOR BIT FAILURES - FROM PORT &. 
6802 3014 013737 001226 001234 MOV PORTB; PTNBR ; T NUMBER 
6803 0430e2 023737 O011e4% 001172 CMP $GoDaAt , STMP3 : SEE AS OK FROM PORT B. 
6804 30 001401 BEO 76$ :BR IF OK 
6805S 043032 104 ERROR 7 :REPORT ERROR 
5806 043034 Od00240 76S: NOP 
e807 043036 oo0004 2s: SCOPE ;LOOP ? 
6809 TEST a4) TEST RELEASE THROUGH PORT °B’ WITH ERRORS GET 
6819 ; ATES TEST RELEASE THROUGH PORT 'B’ WITH ERRORS SET 
6812 : AVERIFY THAT A RELEASE COMMAND PERFORMS NO ACTION IF ISSUED WHEN ERROR 
£813 ;# BITS ARE SET IN THE DRIVE. 
;# 
b8i5 # A. SEIZE THE DRIVE THROUGH PORT °B’ BY WRITING O’S INTO RPOS!. 
6817 :# B. WRITE 1’°S INTO RPERI1 THROUGH PORT ‘B’. 
;* 
6819 ?# C. ISSUE A RELEASE COMMAND THROUGH PORT 'B’. VERIFY THAT THE ‘GO’ 
6820 :# BIT Hes SET, THAT THE DRIVE HAS NOT RETURNED TO NEUTRAL, AND 
peel : HAT Ri HAS NOT BEEN CLEARED. 
;* 
p83 :# D. CLEAR RPERI BY ISSUING A DRIVE CLEAR COMMAND THROUGH PORT ‘8°. 
;*# 
682s :# £. ISSUE A RELEASE COMMAND THROUGH PORT ’B’. VERIFY THAT THE DRIVE 
beee a RETURNED TO NEUTRAL AND THAT NEITHER ATTENTION BIT IS SET 
ie 
6828 SASLAASAARAAASSAARSKAAKSAAARAARERARARSSARAARAARKAAAAKARASSARRSRARRARE 
6829 043040 +6734; 
6830 043040 005737 001274 TST KYBCTL ;PERFORMING ONLY SINGLE TESTS ” 
6831 043044 001406 BEQ 2s :BR IF NOT 
b83¢ 043046 BPL 1$ !BR IF JUST ENTERED TEST 
2S 3050 000 ge IMP EXEC *RETURN & GE XT TEST NUMBER 
6834 043054 012737 1777 001274 1S: MOV el. sYStnn :SET SINGLE TEST INDICATOR 
6835 04 116737 000034 O01102 2$: MOVB : TEST NUMBER 
6836 Ba 3095 1673? o43112 001106 MOV steat ;LOAD LOOP ON TEST ADDRESS 
6837 043076 012737 31le 001110 MOV aTEST PERF LORD LOOP ON ER ROR ADDRESS 
6838 043104 012737 OO7640 001176 MOV basrafes 599 bo 4000. ITERA 
b639 043112 012706 691100 TEST34: MOV sc OER HE STACK POINTER 
bes! ;CLEAR ATTENTION BITS FOR BOTH PORTS 
6843 O43116 113760 001224 ocoDn10 MOvB PORTA, RPCS2(RO) ;SELECT PORT #A 
6844 042124 O05066 900012 CLR RPOS1{RO) :SEIZE THE DRIVE 


> 
=p 
op 


WWWWWW 


2222 PPPECE 


SSNS 


PEPEPLICEE 


ae 


neazeee 


mast 


££ 
RS 


PEPLEEPLILLESE SS 


PEPEEPELSE 
PEEPPEPES 
UPON 


J10 


R LGC__ MACYI1 30(1046) OY-NOV-77 17:48 PAGE 126 
-NOV-77 13:27 T34 TEST RELEASE THROUGH PORT 'B’ WITH ERRORS SET SEG 0126 
012760 00001 MOV #11,RPCSICRO) 
Bis7e0 900013 MOV RPCSI RO) RELEASE THe BR IVE 

26 1 Eames COR poate, patent sre THROUGH PORT ‘8’ 

12 17 900000 MOV ail, Aecd cR0> ve CLEAR 
012760 000013 000000 MOV 

» paunnaans sanennsasbnasnesnsnonnhessenenenesunnsesancnennenenesas 
;SEIZE THE DRIVE THROUGH PORT B 

1137 MOVB 


88 
8 
3 
3 
8 


137 001236 MOV CORTE’ i mst beeen ee OoKG PORTS ADDRESS 
eteaye CLR oat BRITE. 1 


0137 001224 001240 ITE’ PORT ADDRESS 
teeegeasaaaaannnnannnnvensennennsnvovenennvnnensnannnseseses 
012760 177777 000014 MOV 8-1,RPER1(RO)  ;SET ERROR BITS 
2 13 MO 13 RPCS1(RO) ;1S A REL Cc 
1 : 001126 Sov sake ) 7 EET CONTENTS OF ReceL SO ICRTOR 
1 3; 0099 OOl1l2e MOV cae Se REGIST R AQORESS _ OF ERROR MESSAGE 
1 Ole 001124 MO #4012, SGDDAT sWHAT REGIST R D BE 
uy, eves BBL «= BEY SRNL ASITER uve" pecipien erise™™s T° “STMPO” 
025737 boi 125 001164 cH afcvo1! See "760 Pa E THe BITS 
0137 1126 001174 MOV BES ar. STMPY > COPY "BAD DATA’ 
042737 l2 001174 BIC #4012, $TMPY : CLEAR MASKED BITS 
053737 001174 001124 BIS STMP4 ’ SGDDAT 5 OR” WITH GOOD DATA FOR TYPEOUT 
mitted 001244 a con CKERR :SET THe REGISTER COMPARE ERROR INDICATOR 
08737 001244 ‘ TST CKERR ; a ad RESET ? 
0001 Qusi12 IMP :?G0’ BIT RESET 
012760 OO0040 oD0010 V SCLR,RPCS2(RO) INIT THE RH11 
113760 001226 000010 MOVB PORTA, RPCS2(RO) L cr PORT B 
013737 OOleee 001234 MOV PORTB'PTNBR sMOVE ADDRESS TO LOCATION FOR TYPEOUT 
012760 000013 000000 MOV #13,RPCS1(RO)’ ;RELEASE THE DRIVE THROUGH PORT 8 
000137 O44126 IMP es :BYPASS THE REST OF THE TEST 
; SRKAAARKKSAAASRAEASARAAAASASAKASSRARARLARRESKSRSREAAARRKRAKKRRRKSELARASE 
‘VERIFY THAT DRIVE IS STILL SEIZED BY PORT 
1$: 
137 1 010 MOVB PORTA, RPC (RO) T POR 
Bisco Gaiaey DER BE Eeye errand, BT A tear IOAARaaT 1 SITE” 
016037 000012 001126 MOV BPpS! «RQ2, sepont’ ;GET CONTENTS OF RPDS1 
012737 900012 091122 MOV aRPOS1 $B R FORM REGISTER ADDRESS OF ERROR MESSAGE 
005037 001124 CLR $GODAT :WHAT REGISTER SHOULD BE 
023737 001124 001126 CMP $GDDAT,SBODAT ;IS THE REGISTER Ok ? 
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MACY11 30(1046) O4-NOV-77 17 yd ene 127 
13:2 T34 TEST RELEASE THROUGH PORT ’B’ WITH ERRORS SET SEG 9127 
BEQ 68s sore 
ERROR 24 4 SROgs $0 
001244 _ COM CKERR ort T GISTER COMPARE ERROR INDICATOR 
isc 90010 MOVB PORT G — 
1 1234 MOV aay SS_TO LOCATION FOR TYPEOUT 
CLR CK E ’ INDICATOR 
14 Ooi 18 MOV ) sepont’ NTS OF on ap 
4 llee pia’ REG STER ERROR MESSAGE 
i : BA 
1 001124 MOV ® Sal ; T T BE 
001124 001126 cre T, » 8 TF 0k GISTER OK ? 
RROR A ; REPORT " Fanon 
001244 708 COM KERR ;SET THE REGISTER COMPARE ERROR INDICATOR 


H « SEKSKRSSSSRKEKREREKEKESSKEKRSERARSRARRSRARRRRERRRESRERRRAAAAREHRAREE 
:CLEAR THE ERRORS THROUGH PORT B 


060011 900000 MOV @11,RPCS1(RO) ;ISSUE A DRIVE CLEAR 
pM ae ae eg ae ae a a a a ae a a a aa aa aaa aa aaa ER 


;RELEASE THE ORIVE FROM PORT B 


OOiee6 900010 MOVB PORT Cea CRD> ,; SELECT PORT B 
OO0lee& 001234 MOV PORTB: PTNBR ; Move T_ ADDRESS TO LOCATION FOR TYPEOUT 
000013 000000 MOV #13,RPCS1(RO)" ;ISSUE RELEASE THROUGH PORT B 

; VERIFY THAT THE DRIVE IS IN NEUTRAL 


00 CLR ERR Foam rae Ceo ORE SS ERROR ’ INDICATOR 
900 l2 001122 MOV 1 RPDS! FOR TYPEOUT 
1205 24 AoG ane Pan et set ° sEORPARTSON € CONSTANT 
19 MOVB a Aes 
1 1170 MOV rPpSsit RO) i DRIVE. STATUS REGISTER FROM PORT A. 
1 901164 MOV STMPe Sf ey I NTO 
1001 001164 BIC BATA! VV. STMPO : COB ORT DE NOENT BITS FROM THE COPY 
OO1eeb 000010 MOVB PORTB, RPCS2( RO) i CEFBG 
Bovis Sotice = oy Bret! aPueg™® ieopy TUG ORASE gTapy REGISTER FRon PonT 8 
TBO 108 001166 BIC BATA! UV, STMPL ; CLEAR boty T_DEPENDE NDENT BITS FROM THE COPY 
001164 O01166 CMP STHPO, StHP: iis THE 3 STAT GISTER THE SAME FROM BOTH PORTS ” 
001164 eae STMPO :REG STERS ARE THE SAME: ARE THEY ZERO ? 
INE 74S iB NO 
Mies ERROR 46, iB Pp t ne B89" of IN NEUTRAL OR NOT SEIZED 
1150 1126 728: MOV STMP » $8008T : TUB POSSI TF BAD DATA FOR ERROR MESSAGE 
1ee6 toad MOV ORTS;PTNBR : ts NG PORT EST SHOWS DRIVE NOT IN NEUTRAL 
an Fey E TRE Se RO ieee e eT CoaTUS EG 0 FROM PORT A. 
BEQ 3 :BR if ZERO 
001224 001234 MOV PORTA, PTNBR :SEIZING PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 


L10 


EERIE Pigs GHCNDUC77 Taree) COCTOME? ,OU-NOv~ TST RELEASE THROUGH PORT 'B’ WITH ERRORS SET SEG O12e 
013737 001172 1 MOV gaa: ApeSer :° TA’ FOR ERROR TYPE OUT 
7 BOL Tee Bo00i6 Ty af — E raat efatus: EQ ZERO FROM PORT B. 
: 45 60011 1250 738: nov AO ee Slee THe"BR SE ERROR’ INDICATOR 
13 530509 HOV *RPCS1(RO) SPs wPEIVE 
01 B01 29 301258 74S: nov fe » $BODAT tRenge bok Pa FAILURES S WHEN RPOS1 READ 
001124 OO11 CMP +, STMP2 ; 

001 * a al id eon PORT A. 
o13737 931428 9014 75S: nov Srp 3 T CHECK RPDS FOR BIT FAILURES - FROM PORT B. 

3 1124 001172 cre SCDOAT, STHPS READ OK FROM PORT B. 
Partie OR 7 ‘Bre ERROR 
bo0e40 76S: NOP 
000604 2s: SCOPE ;LOOP ? 


$ teen 6 TEST TIMEOUT RETRIGGER THROUGH PORT A 
; ATE TEST TIMEOUT RETRIGGER THROUGH PORT ’A’ 


t SVERIFY THAT THE PORT TIMEOUT ONE-SHOT CAN BE RETRIGGERED. 





ie A. SEIZE THE ORIVE THROUGH PORT ’A’ BY WRITING 0’S INTO RPDS1. 
i# B. WAIT SOO MS AND WRITE 0’S INTO RPDS1 THROUGH PORT ’A’. 
.e° RIFY THAT TIMEOUT OCCURS. WITHIN + OR - asx OF THE SPECIFIED 
i YERe MERSURERENT ROM STEP ’B’. 
:# D. VERIFY THAT THE DRIVE RETURNED TO NEUTRAL AND THAT NEITHER ATTENTION 
a 

egos 4  RSSRERESHLSSEREERATELSHRE HEHEHE HEELS BARRELS HS EHHREKREAKE RHEE RELL ES 

6399S 9044130 +8735: 

6996 044130 005737 001274 TST KYBCTL NG ONLY SINGLE TESTS ? 

6997 044134 001406 BEG es 3 

699E 4136 190098 FJ Sr ENTER RED TEST 

£399 140 i3 IMP TEST NUMBER 

7000 144 16737 179909 001274 1S: MOV Ce yBCTL t Oe WEL TES XTND CATOR 

7001 1S2 1127 35 001102 2s: MOVB tL to T R 

7002 O44160 012737 O44202 001106 MOV g TEST LOOP ON TEST ADDRESS 

roe GNIS Bere fonson BBLIFE ney eatin Bose | B00 Pteaat Snes MOORESS 

2 202 0127 0011 TEST3S: MOV ect Ling 78RD Thee STACK POINTER 

7007 ;CLEAR ATTENTION BITS FOR BOTH PORTS 

7 206 113760 1224 000010 Move PORTA RPCS2( RO) PORT 94 

7010 Rests bdeae5 le CLR RPDS1 ERO) i SetSeT, DRIVE 

7011 O44220 012760 000011 o00000 MOV #11,RPCS1(RO)  :ISSUE DRIVE CLEAR 

7012 O44226 012760 900013 900000 MOV #13; RPCS1(RO) tAELEASE iE DRIVE 


C2RJEBO, OL CTRLR LGC MACYI1 30(1046) O4-NOV-77 17:48 PAGE 129 
CZRJEB. P11 O4-NOV-77 13:27 73S TEST TIMEOUT RETRIGGER THROUGH PORT ’A’ SEG 0129 


onre RPCS2(RO) ;SELECT PORT #68 


ee Oe 


5; SARS SSSSSS SLRS LALS LALLA KLLRLLLAS SALA SARRALRLARALALASS 


;SEIZE THE DRIVE THROUGH PORT A 
001224 9000010 MOVB eeere ‘SetZPT (5S j SELECT PORT A 


O44e62 113760 
4270 737 lee4 001236 MOV sos NG PORT’S ADDRESS 
4, Le eo gf T a 
1 1 001240 PORT ADDRESS 


3 


Peisas 113760 
e4e2 


Biase glare 





WONT £W 


= +b ee pa 


yoy: 


Sees 


 atttaaannssesovononeeseeeannonnnsovoonseueussntnnnnnnenonses 
7029 
spay PRELRLEPL HEE SEE ERHAELEESARSHELEAE RAE SE AAAEERHEL EARS EE LE EE ERED 
703 téTART THE TIMER 
4310 7 CLR AR THE D TIME COUNTER 
pbae Bassi Bi2937 Bodses oo1ess Ov B50. , WATCH SEY Rat CH H YO" 500. M5 
7036 O44322 005737 001254 1S: TST WATCH WATCH EQUAL TO ZE 
7 044326 001375 BNE ;BR IF NOT 
> 4 + SRSLSRKESSKRSERAKARSKRSRSARSSKERELRESSSSARERSKERERSRERSREREREAREAR 
Z040 :START THE TIMER 
4 ? CLR T ME COUNTER 
7o48 Bagaas 893935 884535 oo1osy ov «= eo. ,warcn SEP Hatth So°5888 nd 
7045S  RHERERELKRELEBSHEREL SEAS PERE SESE SELEHHRREREEARHAEREKLSRARAKHEA ERAGE 
7046 ' RETRIGGER THE TIMEOUT ONE-SHOT 
7048 342 005760 900912 P TST te RO? cna) *s rere THE ONE-SHOT 
7056 4 13737 Bais BB7o 4s Nov POR PINeR T gboness 7 TO LOCATION FOR TYPEOUT 
7051 00001 2s: TST ro FOR 
ED BE nse So 4 ape tae 
7055 3 04 RROR 3¢ ‘MOE INEQUT WITHIN 2 SECONDS 
708 Baaaos bi3938 001252 001272 3S: MOV ME, TIMES ELAPSE TIME VALUE 
rats | § ; SARSERSLSSSSLSSSLASLAAELLLAASKELELALLAEELRERERELHLERRRRE LER LLES 
7060 ;VERIFY THAT THE DRIVE IS IN NEUTRAL 
ses O44406 005037 001250 CLR RELERR ;CLEAR TH THE agontse ¢ ERROR ’ INDICATOR 
7063 1e 1 001122 HOV 8 OF RPOS1 FOR TYPEOUT 
7064 be) 1 RO 1/0 8h 
7065 i532 TiS? 1706 maa MOV andl che coy ibe TSGH CONSTANT 
706 4 1 12 ere MOV RPOS1(RO).$TMP2 : BRT ve’ STATUS REGISTER FROM PORT A. 
O44446, 013939 001170 001164 MOV STMP2, STMP :COPY I *STMPO’ 


N10 


CERTERO, OL CTRL LSC? Tce a ee ae THROUGH PORT ’A’ SEO 0130 


64 BIC PORT poaaen BITS FROM THE COPY 
49 MOVB 

i 

1166 

1166 1 


TATUS REGISTER FROM PORT 8. 


weet ITS FROM THE COPY 
et STER THE SAME F BOTH PORTS ” 


ARE THE SAME: ARE THEY ZERO ” 


_ mint THE CHECKS oe NOT SEIZED 


oe 
bo 






1 001 66S: MOV rear 900 08 RROR MES 
1 1354 MOV T ve T SHOWS DRIVE NOT IN NEUTRAL 
1226 10 MOVB PORTB, RPCS2(RO) 
h A 1164 pe 3 us co O FROM PORT A. 
1 DO 1°53 1234 MOV TA, PTNBR cm F_TEST #us DRIVE NOT IN NEUTRAL 
1 B01 4 MOV Tir 3 BB0N8 ERROR TYPE OUT 
B01 eo 1 MOVB TA, (RO) PORT! 
D011 TST F STATUS EQ ZERO FROM PORT B. 


el INDICATOR 


oe “Bok worse FAILURES WHEN RPDS1 READ 


sauce 


am 
3 
PE onl he 


ATO | 





MOV ; 
37 CMP s +, STMP2 : fae OK 
i BEQ 8s ; Ria ROM PORT A. 
OV : TeBpet” 

i MOV STHPS, $8 T ; CHECK 1 FOR BIT FAILURES - FROM PORT B. 
7100 37 MOV TB: PTNBR T NUMBER 
2101 37 CMP scpoAt, STMP3 ; SEE I READ OK FROM PORT B. 
5105 316 4007 Bor ? "REPORT ERROR 
7108 716 boce40 70S: ' 
7108 , COSRUSRASRSORUN EES SS ERESASORSSRDESSSSREERASRERENSSRARSREAE SASS 
2107  AHECK THE TIME FROM RETRIGGER TO TIMEOUT 
7109 720 737 001272 001260 CMP MES, TIMEAP D TIME GREATER THAN +25% TOLERANCE ” 
710g ulree BR808% Ou SP RH 
ate 736 023737 001272 O01262 CMP TIMES, TIMEAM eere TIRE LESS THAN -25% TOLERANCE 
711 eee rahi WS: : P 1? RROR 
2118 044742 600004 . ERR - =s 
71 16 : steseousuceucesteeenresearensencensanuasennuagnacagenaneateates 
3112 ; ATE TEST TIMEOUT RETRIGGER THROUGH PORT ’B’ 
7119 tein THAT THE PORT TIMEOUT ONE-SHOT CAN BE RETRIGGERED. 
7181 i* A. SEIZE THE DRIVE THROUGH PORT °8’ BY WRITING O'S INTO RPDS. 
zie: :# B. WAIT SOO MS AND WRITE O’B INTO RPDS1 THROUGH PORT ‘A’. 
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R LGC  MACY11 30(1046) O4-NOV-77__17:4 
RNDvcr? Tose? 136 test Tineour RETATOGER THROUGH PORT 'B’ S€6 0131 
;# C. VERIFY THAT 7 CURS WITHIN + OR - 25% OF THE SPECIFIED 
i VERIFY THAT TUE SUACMENT SHADE FROM STEP 'B’o) 
i# 0. VERIFY THAT THE ORIVE RETURNED TO NEUTRAL AND THAT NEITHER ATTENTION 
t 


* 
Se geet grey ony sae ress 
7 001274 T t KYBCTL 


; ORMING ONLY SINGLE TESTS ” 
ti sre 
1 1s: MOV eX C. TL rs Us ai rer Gs 7 Mune 
i 7 : MOVB $! NM ; 7 
i 7 ie V er eI Fie wt ON ERROR ADDRESS 
183 1100 TEST36: MOV sctacK. ‘ae THE fete 


;CLEAR ATTENTION BITS FOR BOTH PORTS 


"3 000010 ty PORTO mes setno) a "6 
JOR &. Lea ae 
i ae gh 


ver ny 313° Heed 9 


| ke ee ANAM ea ARC 
;SEIZE THE DRIVE THROUGH PORT B 
413760 1226 000010 Rg ECT TB 
7 1 eb 0012 t ;st Zine ORT’S ADDRESS 
te a $i! hy: T 
001240 ? port ADDRESS 
on ca in tome 


HA 


5 + SSESSSSSESRSSSSSERESAAASRSASSSEASESSRRERSRRERAASRRASKERRARE RELA 
'éTART THE TIMER 


005037 O0l1eSe cn a te § D ae COUNTER 
012737 ne 4% 001254 MOV i . » WATCH is WATCH 
pe H 


1284 1S: ceed 18 TO 


H  SSSSSSSASSSSSSRSSSSSKSSAREARESEASSLSSHRERHKAARARARRARRAHLRARARARAER 
‘TART THE TIMER 


leSe CLR TIME CLEAR THE ELAPSED TIME COUNTER 
3720 001254 Mov #2000. , WATCH iSET WATCH TO 2000 MS 


ee 
ee TU 
‘e- N 
= 
Bas 
<< 
Bee 


o 
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SZRTEBO, OL CTRER EGC, MACYS! SOC1ONG) |QU-NOV- 77 eT TENEOUT RETAYEGER THROUGH PORT 8’ SEG 0132 


@ 
= 


+ SESSESSSSESSSERSESSSESASSESS SSSR ESSHEREREAAARSRAEEEEE ARLE AES 
‘ RETRIGGER THE TIMEOUT -SHOT 


ate: wes: te 0 nove Bae ae (RO) Te 
1 bis le hav ecd MOV Davis oer esters Ss To LOCATION FOR TYPEOUT 
1 ;WAIT F Ine Ou 


7 
760 000012 es: TST 


Esse HELO cosas a Ent ae jo°s8ke"F 
Eesie U9 ooiese ooizre 2s RON Fhve,rives Mod REVEL ABUED FBG 


5 jab ab ab ab ab a8 A a A a a a a a a a a a a a a a a a a a a aaa a aa aa 
; VERIFY THAT THE DRIVE IS IN pa 


NNNNSINN NN NNN 
ee ee be be he be he be ee 
SRRIOH A ESBIRRZSHK 





183 cLa * INDICATOR 
V 1 FOR TYPEOUT 
7201 ADD 
7202 MOV "BSE ogre whe 
5504 nove 
7 Vv Hee REGISTER FROM PORT A. 
7205 MOV ; 
7206 BIC ; i NOERT BITS FROM THE COPY 
7508 nov. 3} TATUS REGISTER FROM PORT B. 
7210 I : ITS FROM 1H COPY 
7818 ets msi nOFNT 8 THE SAME F BOTH PORTS ? 
7e13 Chi oe © ARE THE SAME: ARE THEY ZERO ? 
7215 ; NOT IN NEUTRAL OR NOT SEIZED 
3515 66S aov : THE TS ESR ERR 
7518 ‘ MOV T : ie cE T SHOWS DR + Ror Fe eR NEUTRAL 
7een oo r ; “EQ O FROM PORT A. 
ress nov ORT : ie F Test TEST SHOWS DR DRIVE NOT IN NEUTRAL 
7564 MOVB RTA: APCSeCRO) ; 
7¢ ret MP1 : aes EQ ZERO FROM PORT B. 
7 67S: MOV a-1, RR : i INDICATOR 
i a 
7 cos FER" Fhe. sooner a Pe sen wos: me 
7 4 . MOV ORT TNBR act ey veORt "yuneeR 
? CMP $s +, STMP2 ; TS OK 
7 34 BEG 69s es OK FROM PORT A. 
7235 3 T ER ROR” 
723& O4SE04 001172 OO1126 69S: MOV STMP3, SBDDAT CHECK K RPOS| FOR BIT FAILURES - FROM PORT B. 
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7237 Ous5 12 737 1226 001234 MOV PORTB,PTNBR HANGE PORT NUMBER 
7338 5 4 ? 1124 001172 CHP $GD0A pat, $TMP3 a onene OK FR FROM PORT B. 
7240 ous 40400 RROR 7 pap T OE RROR 
751 0 70S: NOP 
7243 peoeenquaegeesegecestr ts 
g 4  AHECK THE TIME FROM RETRIGGER TO TIMEOUT 
Zeng Ouss34 023737 001272 001266 crp TIMES, TIMEBP : Ne D TIME GREATER THAN +25% TOLERANCE ” 
7eNg 44 7? 001272 001270 CMP TIMES, TIMEBM ; He DO TIME LESS THAN -2S% TOLERANCE 
oS¢q Gueees Tpdoes us PRROR 2s OR OORT THE ERROR 
7251 Bueeee boo00% : SCOPE ait a ? 
cen 
recs ry pre ete See Reet EEO ORT TAY ATTENTION AFTER A COMMAND 
7e5e i ATES TEST PORT 'A’ ATTENTION AFTER A COMMAND 
7258 
7259 iStest THE OPERATION OF THE PORT A AND PORT B ATTENTION BITS AFTER A 
7gb0 ; COMMAND . 
i 

Zee i# A. ISSUE A RECALIBRATE COMMAND THROUGH PORT ’A’. 
7264 t* 2B. WATT FOR T IBRAT COMPL CORY: T COME 
o5ec :§ OR RT EY taat THe BTFENTION, git FoR POR PORT zi 5 Sef Eko 
7ebb i# THAT THe ATTENTION BI 
7262 :# 6C. THE DRIVE T RIFY THAT THE DRIVE RETURNED 
7eb3 i LT RAL AND vhiat Rey SHER PORT TENTION Bi } IS SET 
763k ; {gpeneneneeeennneneneenenernenenneneenneeet 
727 265 905737 001274 TST KYBCTL ; NG ONLY SINGLE TESTS ” 
7274 1406 Q es ; 3 
7275 366 PL is ; FJ STENT RED TEST 
7 28 ogeede XEC ; T NUMBER 
72 574 127 001274 1S: MOV 8-1, KYBCTL ; Ts TEST INDICATOR 
fa bees lige tee Bie Sle Ne ee I 

ee 
5580 pee 13333 601138 MOV srEsT 7’ SLPE eh on ERSor ApoRESS 
7281 et 12737 001176 MOV #4, STIME ; TERATIONS 
728¢ 045632 012706 001100 TEST37: MOV sstACck, $7998 the STACK POINTER 
2 ;CLEAR ATTENTION BITS FOR BOTH PORTS 
7286 O4SE36 113760 001224 O00010 MOVB PORTA RPCS2(RO) ; 
7 44 le CLR RPDS ) Ke VORIVE 
7 1 1 Vv #11, ee ; DRIVE 
7 01 MOV ais 1(RO) 
7290 4 11 010 MOVB PORtB Se(RO) ; tec 
7291 045672 1 CLR RPOS1{RO) ; He DRIVE THROUGH PORT °B° 
7292 O45676 012760 00011 oD0000 MOV #11,RPCSI(RO) ;ISSU ORT ve CLEAR 


eSRjes. #11 


Di CTRLR LGC macys! 30( 1046) 
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O4-NOV-77 
peta 012760 3 
bt 137 788 le 
04S7 137 le 
04S7 013737 l2e4 


045734 012760 000007 


o4S74e 032760 000200 
048750 001774 


saa 
BRE 


pare 


g Gees 
: 8S te 
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sbaadeasanees 
ZEENEALRVTOR 
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ne 
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ale 
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8 888 
a ey ae et ee et a at 
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to 


P22 TET? Vo 


g 
s 


Fe he 
a ae 


TOPO ar eine APOE TTENTION AFTER A COMMAND 


1(RO) 


nove Bort, RBC 
HOV Hai ie 


MOV PORTA 


11 


(RO) 


LEASE THE ORIVE 
dové LETT apoREse 
;"SEIZED’ POR 


Ss apa teh ton FOR TYPEOUT 


3 + ERESSREEESREGGEEEEE ERASER EE EE EEESEAES SEAR ERAE SEERA SS ARES ERASER 
0 A RECALIBRATE THROUGH PORT A 


MOV #7,RPCS1(RO) 


+ SESE GEEEEEEERE EE EEEEE SEES REESE ASE RA ELSR RA ARER SLES REAL EE EH 
Mart FOR DRIVE TO FINISH 


BIT dias 


* KONE I 


64S: 


66S: 


Beeeees 


<oO 


gzgummame 
eeeganeet 


PORTB, RPCS2( 


MOV PORTB, PT 


 HHUSHCSSOSEUHTERUSESONESSSSERE SES RR SERS SERRE EESEEEESESEEE SSeS 
: ONF IRM THAT ATTENTION IS NOT SET FOR PORT 8B 


;CLEAR THE °C CK. ERROR’ INDICATOR 


wo 
ra 


omow 
aie 


3 
v 


; ISSUE A RECALIBRATE INSTRUCTION THROUGH PORT A 








;WAIT FOR DR Miotg MR FINISH 
;BR IF NOT F 


jSeeeeeuRenaneneseseseesasesenesssesaesanennnenennasssssssseness 
RM THAT ATTENTION IS SET FOR PORT 


sCL 
T . 


CON 


PALL SER. 
ie "8 is TO *STMPO’ 
IF 





ph ee 


ROMovE PORT 


cT 


CHECK =APOSL INDICATOR 
OF ERROR MESSAGE 


+5 Bata’ Por TYPEOUT 


SRECTSTER COMPARE ERROR INDICATOR 


PORT 8 
ADDRESS TO LOCATION FOR TYPEOUT 


robe RECISTER R SReSs. OF ERROR MESSAGE 


TUR pee TO *STMPO* 


a : DATA’ 
AR ind E 


Hs WITH Bafa For TYPEOUT 
YPE Resgace 
eT T GISTER COMPARE ERROR INDICATOR 


SES 0134 


age 


NNNNNNNIOS eae 
- 


madara 


Hieaeowenes 


oO~ 

ee Se 
a 
WIG) 
NN 
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eeeeg 
R28R= 
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gases RRS 
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RRoRETIRER 


29999999 
SRE 


Fill 
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137 TEST PORT ’A’ ATTENTION AFTER A COMMAND SEG 0135 


5 5 RASSAAESSSESSSSSLSSELSSSSSSLELLLSLAALSRKALHLARAARARAAAARAEAAAAE ES 
;RELEASE THE DRIVE FROM PORT A 
0 MOVB PORTA,RPCS (RO) vb SEbE T PORT 
4 MOV PORTA’ PT aDBRESS TO LOCATION FOR TYPEOUT 
000000 MOV #13, Recsi TROD Mone RELEASE THROUGH PORT 


; VERIFY THAT THE ORIVE IS IN NEUTRAL 






CLR RR i AR _THE ASE ERROR ’ INDICATOR 
001122 MOV cts aes Rponese. FOR TYPEOUT 
ADD RO 
1124 MOV 


4 HOV BOG 2 ¢ ae ISON ZONSTANT 
1170 MOV RPOS (RO), $T a ies TATUS REGISTER FROM PORT A. 
1164 MOV STHP ys ine 


ed BIC cH 43! Bho Se NOENT BITS FROM THE COPY 
T1172 Move cro ate ise in TATUS REGISTER FROM PORT B. 
1166 MOV ST STMP on N O° 
001166 BIC BATAIYV,STMPL =; hoe ITS FROM THE C 
001166 . §TMPO, STMP1 warrt Rote THE SAME FROM OBOTH PORTS ? 
rey THPO s ARE THE SAME: ARE THEY ZERO ”? 
ERROR 3s :REPOR ORIVE NOT I of NEUTRAL, 2 OR NOT SEIZED 
gs: MOV MP2, T yeRs ae DATA FOR s ERROR MESSAGE 
i356 ’ MOV SORT + SOROR iee pote ee e, SHOWS DRIVE NOT IN NEUTRAL 
10 MOVB PORT »RPCS2(RO) ; 
T i : stat us’ £0 O FROM PORT A. 
001234 MOV ea : f PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 
1126 MOV MP3, T y TA FOR ERROR TYPE OUT 
10 MOVB Pont : (RO) Set fr 
TST str MP1 Tats. EQ ZERO FROM PORT B. 
OG 69S: BOY . OF ; T ERROR’ INDICATOR 
950600 nov 1; APCS (RO) ie setae 
HOV 513° RPCS1(RO) RE 
001126 70S: nov NPE, opaT fe rot sin FAILURES WHEN RPDS! READ 
por is0 CMP 22 gael ta ieee 
BEG i$ PORT A. 
001126 71S: Rov 51 nP3., DAT oo + Ronee FAILURES - FROM PORT B. 
001234 MOV ORT 5008 
001172 cry SgDOAT, $ STHP3 SEE OK FROM PORT 8. 
ERROR 7 Bee OE RROR 
728: NOP 
SCOPE ;LOOP ? 


5 PRERESEAEAALAAELASARAELAARALALAARLLALAALSRALAEAAARKAARARARAA ARE RAL? 


O4YE7 16 


O4E734 


005037 


Yili 
:27 


eee 


TOU 


B88 
fururu 


000007 


001244 
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900000 


000012 


Gll 
od OY test abn? *B CRTTERTION AFTER A COMMAND 


;#TEST 40 TEST PORT ’B’ ATTENTION AFTER A COMMAND 


ans pe taatna ant eau ar ana aateaasnesiata te Nettie 
4 


oe: 
+ 


TST KYBCTL s DERE OANIING ONLY SINGLE TESTS ” 


BEG : 
BPL 73 ‘Be aie Sus ENTERED TEST 
IMP EXEC ;RETURN & T NEXT TEST NUMBER 
18: MOV 8- KYBCTL t 73 . TEST INDICATOR 
; MOV aT ap PADR iL tg LOOP ON TEST ADORESS 
nov ay T PE tL yb OOP ON, ERROR ADDRESS 
TEST4O: MOV ss etc +2 ORO" THE STACK POINTER 


; CLEAR ATTENTION BITS FOR BOTH PORTS 


VB PORTA, RPCS2(RO) SEL CT PORT #A 
CLR RPDS 1 ER ) T DRIVE 
MOV #11, 1(RO) ; CLEAR 
MOV 813.RPCSI(RO) ; DRIVE 
MOVB tp S2(RO) ; tec PORT #6 
CLR RPOS1{RO) : T IVE THROUGH PORT ‘B’ 
MOV #1 Ape 1¢R9) ; bk AR 
MOV al 1(RO)  : VE 
MOVB PORTB, RPCS2(RO) an: 
MOV PORTB, PT ; Move T ADDRESS TO LOCATION FOR TYPEOUT 
MOV PORTB’ SEIZPT ; SEIZED’ $s 


Pe ee ee eee ee 
iho A RECALIBRATE THROUGH PORT B 


MOV #7,RPCS1(RO) ; ISSUE A RECALIBRATE INSTRUCTION THROUGH PORT B 


Z =< SSSSRSSSASSSASSSSSSSSAASSASSSASHSLSASRASAAKSSAARARAASERLAARSARES 
hart FOR DRIVE TO FINISH 


git BORY,RPOS1(RO) ;WAIT FOR DRIVE TO FINISH 
Q -~% :BR IF NOT FINISHED 


= RERESSSSAAASASSASASASAAASARAREKALAREKAARASAAEAARARAAARARAAARAPARALAEE 
!AGNFIRM THAT ATTENTION IS SET FOR PORT B 


CLR CKERR ;CLEAR THE "CHECK ERROR® INDICATOR 


;*# 
; #TEST "s OPERATION OF THE PORT A AND PORT B ATTENTION BITS AFTER A 
Cc . 


7% 

;*# 

Je A. ISSUE A RECALIBRATE COMMAND THROUGH PORT ’B’. 

:# 2B. ort FOR _T I T TO C TE (¢’ ae st ge cone 

:s iJ. VERDEY THAT THe BTYENTION, BIT FOR PORT *B” IS SET AND 

+ THAT’ THe ATTENTION BI oN, 8? IS NOT SE 

3 C. RELE THE DRIVE Mires es *B’ RIFY eT THE DRIVE RETURNED 
7; TO NEUTRAL AND THAT HER ATTENTION IT IS SET 

} 


SES 0136 


Hil 
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CZRIEB.P11 O4-NOV-77 13:27 T4O TEST PORT ’B’ ATTENTION AFTER A COMMAND SEG 0127 
7461 046740 016037 O00012 001126 MOV RPDS (RO) . $80 gegont ohtt he CONTENTS OF RPDS! 
74uee 046746 012737 O000le OO0llee MOV R ADORESS OF ERROR MESSAGE 
7463 754 ADD PAL fa Ss 
7464 1 001124 V i 
oa6s 137 001164 Vv none besfer TENTS TO *S$TMPO’ 
oe? 4 3737 001124 bo; 164 as Ee sino te gb airs 
Os l 414 Q en IF Bx" 
re8 1 13737 0011 901174 MOV iy Y,’ BAD DA 
: NPY 

aA | os 130068 nareee fs 3 $7mP4*scDoA ice WITH PABKED 217 Por TYPEOUT 
747 4703 os 005137 001244 eon eeRR och Maat Register COMPARE ERROR INDICATOR 
474 64S: 
7475 047044 113760 001224 000010 MOVE PORTA, RPCS2( RO) : SELECT apORT 8 
cay 0470S2 013737 OOl2e4% 001234 MOV PORTA; PT ; Move SS TO LOCATION FOR TYPEOUT 
2478 + SSSSSSSSSSSSESESSSERASSSESESSESEEEEEESREEER REESE REEEEEEEE EERE EE 
ouz9 ‘ONFIRM THAT ATTENTION IS NOT SET FOR PORT 
sage 047060 005037 001244 CLR CKERR ;CLEAR THE ’ CHECK ERROR INDICATOR 
7482 047064 1 1 001126 MOV (RO) T’ -GET CONT NT RPOSI 
74 0470 78 7 4 00112 MOV iF REGISTER 35. ERROR MESSAGE 
La 310M 7 i CLR sabe eT RE T 
74 Bast to 13737 001188 001164 mBV T, STMPO WaT REGHST Fe aie *$TMPO’ 
7487 047116 O4 0 001164 BIC StCATA, STMPO ste SPECIFIED 
7ig8 ou7 ied G27 37 001124 001164 cn T; $TMPO ; 
74 71 1414 Q ; 
7490 047134 013737 001126 001174 MOV T, STMP4 : COP 1) "BAD DA 
7491 O47 148 100000 001174 BIC HAL stMPy > CLEAR RASKED B 
7492 0471 001174 001124 BIS $TMP4 , SGDDAT :*OR’ WITH GOOD ooRA. Por TYPEOUT 
7493 047156 104032 ERROR 32 ; TYPE PE MESSAGE 

94 047160 005137 ocO12e44 COM CKERR !SET THE REGISTER COMPARE ERROR INDICATOR 
74s 047164 O00240 66S: NOP 
ee gs SKSAASASSSASEASSA SASS SAAHAALSSHESEREAARAARELLLAAALLRALAEASSRER 
7499 ;RELEASE THE DRIVE FROM PORT B 

1 O471 137 001 0 MOVB T (RO? TP 
75s B43 198 3133 BG SSE eet MOV PORT BB hove -BbRF aboRESe TO LOCATION FOR TYPESUT 
7303 012760 900013 900000 MOV #13, TE,PINR ; ISSUE RELEASE THROUGH PORT B 
7505 ; VERIFY THAT THE DRIVE IS IN NEUTRAL 
Fei BURL QOS GONE cou ize re gs SORA Te oo D REESE “RODE, SRPHEESU 
3206 B43 22 B25039 et ADD RO ADD THE B 1/0 Base RbORESS 
7510 Ou7ece 012737 911206 o01128 MOV andy: 'DPR! vi OMPARISON ZONSTANT 

11 7 11 le 10 MOVB PORTA (RO) PORT 
rele 047242 016037 900012 001170 MOV Srnee. sit STMP2 ; y he DRIVE. STATUS REGISTER FROM PORT A. 
751 7 013737 11 001164 MOV $T :Gopy INTO '§ 
7514 042737 100100 O01 16s BIC sarary STHP ; CLEAR PORT PENDENT BITS FROM THE COPY 
7515 0472864 113760 l2e6 010 MOVB a RP Soc RO) :SELECT PORT 
7Ei— 947272 616037 000012 001172 MOV ROpST ROS, $™MP3 :GET THE ORIVE STATUS REGISTER FROM FORT 8. 


a 


FLLECLLILLELPLILELE 


S2L2EEE 
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Til 
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O4-NOV-77 13:27 T4O TEST PORT 'B’ ATTENTION AFTER A COMMAND SEG 0128 
? 13737 1172 001166 MOV STMP3, STMP1 ;COPY IT INTO ’S$TMPI’ 
? 7 l 00116 IC BATA'VV.STMP1 :CLEAR PORT DEPENDENT BITS FROM THE COP 
3 14 7 1164 O0116 MP STmPO. stmP1 :IS THE Pa on REGISTER THE SAME FROM BOTH PORTS ” 
7 001164 i OFS : ARE THE SAME: ARE THEY ZERO ” 
3 sae ERROR A : NOT obs NEUTRAL OR NOT SEIZED 

o 

5336 7520 IMP 728 ; HECKS 
7 1 il 00:126 68S: MOV TMPe, aT : Bao ORT FOR ERROR MESSAGE 
? 1 1eeb 1234 MOV TB; : ie NG PO T SHOWS DRIVE NOT IN NEUTRAL 
7354 113760 1 iverarte MOVB PORTB,RPCS2(RO) ; 
7362 23 001164 rst 0 : ree EQ 0 FROM PORT A. 
73 T3747 001224 001234 MOV TA, PTNBR : 3 f eer IF TEST SHOWS ORIVE NOT IN NEUTRAL 
7376 013737 001122 001126 MOV 3 3; T :? TA’ FOR ERROR TYPE OUT 
7404 113760 001224 000010 MOVB PORTA,RPCS2(RO) ;SELECT PORT 
7412 905732 001166 TST 1 ; E ir gyrus: EQ ZERO FROM PORT B. 
eats 1018 BNE ; 
74 127 177777 001250 69S: MOV #1, RELERR ; ah en INDICATOR 
rice 16760 000011 000 MOV #11; 31 (RO) RELE EAR 
74 - 1 000013 Wy #13,RPCS1(RO) 
7444 o1 237 001170 OO11 70S: MOV MP.  $B008T i ee Mat a Pato URES WHEN RPDS1 READ 
an 17 pies 801530 CoP oRTa sTHee ‘ L gITs 
7466 001401 BEQ aC eer Fox oon PORT A. 
7470 10400 ERROR 7 
747 013737 001172 OO1126 71S: MOV sTHP » $B00AT i CHECK PORT ERROR FOR BIT FAILURES - FROM PORT 8. 
505 137 001226 O01e34 MOV ORT NBR C PORT 
7506 023737 001124 1172 CMP SGDOAT, STMPS ; SEE IF READ OK Peon PORT B. 
7514 001401 2s F 
7516 104007 ERROR 7 : REPORT ERROR 
7ee0 000240 72$: 

2 oo0004 SCOPE ;LOOP ? 


5 ARASAKRKLALRSAARAAARSASAAEASRKKSRKEASRESRKRAKRRASRAARARARAAARARELLRARAELER 
;ATEST T 41 TEST PORT INTERACTION FROM PORT ’A’ 


i SVERIFY THAT THERE IS NO INTERACTION BETWEEN PORTS. 
A. SEIZE THE ORIVE THROUGH PORT °A’ BY WRITING O°S INTO RPOS1. 
8. WRITE 1°S INTO RPERI, RPER2, & RPER3 THROUGH PORT ‘A’. 


C. READ RPERI, RPERC, & RPER3 THROUGH PORT 'B’. VERIFY THAT PORT 
’B’ SEES O'S FROM’ EACH OF THESE REGISTERS. 


CLEAR RPER1, RPER2, & RPER3 THROUGH PORT ‘A’. 


E. WRITE 1°S_ INTO RPERI, RPER2, 8 RPERZ THROUGH PORT ‘B*. VERIFY THAT 
PORT Ae SEES 0’S FROM EACH’ OF THESE REGISTERS. 


F. RELEASE 1% DRIVE ae PORT °&*. VERIFY THAT THE DRIVE HAS 
SWITCHED TO PORT °B’ AND THAT THE ATTENTION. grt FOR PORT °B’ [S 
SET AND THE ATTENTION BIT FOR PORT ‘A’ IS NOT SET. 


OF ee OOF Oe ee ee OF we es ee ee we as ee 


ee ee ee ee ee | 
o 


Jil 


PRIEBO, DL CTRLR LGC  MACYI1 3011046) O4-NOV-77 17:48 PAGE 139 
‘SRIEB.P11 O4-NOV-77 13:27 T41 TEST PORT INTERACTION FROM PORT ‘A’ 
757 # 
7574 ;# 6G. ISSUE 8 RELEASE COMMAND THROUGH PORT ’B’. VERIFY THAT THE DRIVE 
2825 # RETURNED TO NEUTRAL AND THAT NEITHER ATTENTION BIT IS SET 
22 janes eames eee anaancabidiininmembrennattitestcy. 
7579 905737 001274 TST KYBCTL 
7580 1406 Q F NO 
7581 F JUST ENTERED TEST 


ee ee ONLY SINGLE TESTS ” 
ise URN & GE TEST ER 


saeasuuuyy 
a 
E 
3 


SHORE 
P2PPPAPEP IE 





rt 
1274 1 V Fs oe L ; ret E tes XINDECAT 
1127 1 et iae 2s: MOVB 841 $7 TNM : TEST POMBE 
012737 047576 001106 v #TEST41, SLPADR iL8ab, Lop ON TEST ADDRESS 
127 047576 001110 MOV aTESTY1 PERR iL LOOP ON ERROR ADDRESS 
7587 16737 o07640 001176 MOV 84 28 ::D0 4 TTERATI ONS 
7588 127; 1100 TEST41: MOV aSTACK, :COAD THE STACK POINTER 
75 50 3 ;CLEAR ATTENTION BITS FOR BOTH PORTS 
75 OM 3 24 000010 MOVB PORTA RPCS2(RO) : CT PORT #A 
5eg5 Base t8 ddare8 12 CLR ARO ; 1 THE DRIVE 
7594 047614 o1 if MOV Ti RPC 1cRO) : I CLEAR 
7595 Ou7bee 1 13 MOV #1 1(RO)_ LEASE DRIVE 
759% 0476 il 10 MOVB state S2(RO) ; ¥ PORT #8 
7597 047636 005060 le CLR RPOS1tRO) ; 2 THE DRIVE THROUGH PORT ‘8’ 
7598 O47642 012760 11 MOV $11,RPCSI(RO) ; DRIVE CLEAR 
7599 047650 012760 13 000000 MOV @13;RPCSI(RO) ; PreASE PRIME DRIVE 
oeot ;SEIZE THE DRIVE THROUGH PORT A 
5eD5 O476S6 «1137 12 000010 MOVB PORTA, RPC (RO) ;SELECT PORT A 
7604 047664 13737 0018 001236 MOV PORTA’ SEtZPT ;st SEIZING PORT’S ADDRESS 
oene eee 13737 se 1240 abv at iNGppostTE’, PORT 8 Ss 
047704 6135 noises 14 MOV #-1,RPERI(RO)  ;LOAD 1’S INTO RPE po ORE ROUGH PORT A 
7608 047712 ble? 177777 900049 MOV #-1' Rat ) LORD 1’°S INTO RPERe THROUGH PORT A 
oEt6 pee 133 : 1 16 Move Port : CRO) - L AS pbaT. oo caged 
sell Gira Biire Blse BEN FEL EERTEL CTR shoud POF esas RT 
7613 Oa a eue 1137 i 10 MOVB PORTA, (RO) SELECT A 
se14 alee 4 137. 1 4 1234 nov PORTA, PIN jMOVE OR afboRESS TO TO LOCATION FOR TYPEOUT 
7616 047768 6 CLR RS ) i CLEAR Re ON PORT A 
7617 O4 14 CLR R1(RO) CLEAR RI PORT A 
7618 047776 01 1e32 900016 HOV 1 (RO) CL ART ATTENTION BIT FOR PORT A 
Pe Ge oh nae ener ne nas 
7622 050026 btSze5 1 aaente MOV 8-1 Ra CRD) *LOAD 1°S INTO BEERS THRoucH Met PORT B 
623 050034 012760 177777 O0004e2 Ov 8-1 R3(RO) ;:LOAD 1°S INTO RPER3 THOROUGH PORT B 
762% O50042 113760 OOl224 o900010 MOVB PORTA,RPCS2(RO) ;SELECT PORT A 
7625 SO 013737 O0l2ee4% 001234 MOV PORTA’ PTNBR ;MOVE PORT ADDRESS TO LOCATION FOR TYPEOUT 
762 050056 004737 OS50600 JSR PC, TSt41B ;CHECK THE REGISTERS THROUGH PORT A 
7628 RELEASE THE DRIVE FROM PORT A 
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30(1046) O4-NOV-77 17 4 
T41 TEST POR INTERACTION FROM PORT ’A’ 
000010 MOVE PORTA, RPCS2(RO) jSELECT PORT A 
i MOV PORTA’ PTNBR nove Oe SS_TO LOCATION FOR TYPEOUT 
MOV #13,RPCS1(RO)’ SSUE "REL ASE THROUGH PORT A 
;VERIFY THAT DRIVE IS SEIZED BY PORT 8 WHEN RELEASED BY PORT A 
CLR AR ’REL ERROR’ INDICATOR 
01124 nov 'vV COMPARISON CONSTANT 
s 
m3 Tie BeSE SDBRESS' Fon Tvrcout 
000010 MOVB L 
001234 MOV aor TO LOCATION FOR TYPEOUT 
1164 MOV STATUS GISTER F PORT 8 
eyes MOVB T TA 
001234 MOV SS TO LOCATION FOR TYPEOUT 
001126 MOV - DRI ATUS FROM 
BEQ : TATUS FROM PORT A ZERO 
rot : TA F PORT 8 ZERO ” 
BE RoR 1 H T RIVE IN NEUTRAL 
001126 66S: MOV TMPO, SBODAT :CHECK STA Tus FROM PORT B 
001234 MOV PORTB’ PTNBR :¢ PORT ADDRESS FOR TYPEOUT 
001126 CMP S$GDDAT,SBDDAT ;C WITH CONSTANT 
BEQ 675 :BR IF 
ERROR 27 :REPORT REGISTER ERROR 
67S: NOP 
;RELEASE THE DRIVE FROM PORT B 
000010 MOVB PORT » BPC (RO) jSELECT PORT 8 
001234 MOV PORT nove SS TO LOCATION FOR TYPEOUT 
000000 MOV #13, Recsi TRO) SSUE RELEASE THROUGH PORT 8 
;VERIFY THAT THE DRIVE IS IN NEUTRAL 
CLR AR THE ’ EASE ERROR * INDICATOR 
001122 HOV BRPDS1,SBOADR FoR THe OF RPOS! FOR TYPEOUT 
1124 MOV ham 'DPR! vider bat easier CONSTANT 
10 MOVB PORTA (RO) SE Cc 
001170 MOV RPDS RQ) TMPe ; T PORIVE’ STATUS REGISTER FROM PORT A. 
001164 MOV STMP2, STMP ;COPY IT INT pa, 
001164 BIC BATA STHPO >CLEAR Port NDENT BITS FROM THE COPY 
000010 MOVB PORTB RPCSe\ ) ; SELECT PORT 
001172 MOV RPDS RO) TMP3 ;GE HE ORIVE STATUS REGISTER FROM PORT B. 
001166 MOV STMP3, STMP1 $ ROBY I NTO TMP 1? 
001166 BIC BATAIUV, STMPL CLEAR P 1 DE NDENT BITS FROM THE COPY 
001166 cn $inPO, StMP1 ; THE TAT GISTER THE SAME FROM BOTH PORTS ” 
TST $THPO i TERS ARE THE SAME: ARE THEY ZERO ” 
BREOR 46 *REPORT DRIVE NOT IN NEUTRAL OR NOT SEIZED 
IMP 725 :BYPASS THE REST OF THE C 
001126 68S: MOV STMP2, SBODAT :SET UP POSSIBLE BAD DATA ESR ERROR MESSAGE 
001234 MOV PORTS! PTNBR :SEIZING PORT IF TEST SHOWS DRIVE NOT IN NEUTRAL 


Kill 





SEG 0140 


On 


SRIEB Pity OM CND GC 77 Basae) SOC HONG) OI NOV ocr oR Fe Shed on FROM PORT ‘A’ SEG 0141 


goLers 000010 MOVB PORTB, RPCS2( RO) 
A A 1164 ed $T 


Bo 124 i nove Bomra:APCSecRO) 
708. RR 

81 “RBCEI CRO» 
#13, RPCS1(RO) 


SELECT 
See IF gee "EQ O FROM PORT A. 


F TEST SOUS DRIVE NOT IN NEUTRAL 
a te OR ERROR TYPE OUT 


nae E@ ZERO FROM PORT B. 


s Pal he ihe canon” INDICATOR 


ew ari peitiedt WHEN RPDS! READ 


88-28 
be 

N“N 

8 

me 

~ 

o 

+ 

w 

«4 


See 
ance 
as 
383 


69$: 


eae eee ee eres ee Or AMC Sees es Sees ee wee ee 


SRAGERSERE AAT PERS ORR 








1 001170 1126 70S: MOV 
1 001224 00: 258 MOV Ara’ aes ‘ 
001124 1170 CMP jl sTure Ts 
1 BEG ty Ox. Pron PORT A. 
fe 031328 091388 71S: MOV MP Rais ue "poet IT FAILURES - FROM PORT B. 
1226 O01 MOV sip 1 RURBER 

: 37 1124 001172 che +, STMP3 1 okt OK FROM PORT 8. 
220 a ERROR 7 REPORT E ERROR 
7708 ; OeoPE ;LOOP ? 
3703 000137 051132 IMP TST42 :GO TO THE NEXT TEST 
at ;CHECK THE REGISTERS ON THE SELECTED PORT 
771 TST41B: 
ee SPE BARTS ooze = i CLEER Leen Se Reem, NOLCATOR 
e718 O014 001122 mov REGISTER AQDRESS _ OF ERROR MESSAGE 
7718 li CLR ty: Re TE SHOULD BE 
ca 3 37 001124 001126 chr ‘ae THE GISTER OK ? 
77el 1 RROR : TYPE eSsact 6 
77 1 1 COM :SET T REG STER COMPARE ERROR INDICATOR 
77 i 001126 64S: MOV T aget TENTS OF RHCS1 
77 1 o 001122 MOV 3F a ss REGISTER 
= i 820065 001126 ay ils IF : ser? 
77 1 ERROR Li : REPORT THE ERROR 
2? o4oc00 900000 a MOV STRE,RPCS1(RO) :CLEAR ’ , 
7731 1 ‘ CCR CKERR ;CLEAR THE *CHECK ERROR’ INDICATOR 
7736 001126 MOV (RO) T’ ;GET CONTENTS OF RPER2 
5534 lize tee noo OCR FORT ReGiSTen AQGneag.OF ERROR MESSAGE 
7735 1124 CLR GODA :WHAT REGISTER SHOULD BE 
3738 023737 1124 001126 cre ScODAT, se00AT 1S THE REGISTER OK 
7738 04008 ERROR 6 : TYPE MESSAGE 6 
7739 boes 001244 COM CKERR :SET THE REGISTER COMPARE ERROR INDICATOR 
7740 050756 016027 OO OO1126 66S: MOY RPCS1(RO),S$BDDAT’ ;GET THE CONTENTS 0 
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oth 1 30( 1046) 


tree <4 a PAGE 142 
T4 TEST PORT INTERACTION FROM PORT ’A’ 


roy RG, SB0ADR i ASDRESS Baee OF REGISTER 


BIT entPE, , SBODAT 31S IE NOT SET ? 


ee stRE, RPCS1 (RO) olen} ree ERROR 
CLR RR 3c THE CK ERROR’ INDICATOR 
Se RORP rae Ee sige cmon vee 


67S: 


B T WHA T 
SS EESBGT,ssoonr MATERIA RR 
RROR ; 
OM KERR ; SET Teast FER COMPARE OMPARE ERROR INDICATOR 
68S: v RPCS1(RO) T g TEN 15-06 OF RHCS1 
;F GISTER 
RO 5 Ss 
I ahEPE , SBDOAT : rHICPE SET ? 
1 ; PORT Ne ERROR 
MOV STRE,RPCSI(RO) ;CLEAR 'MC 
69S: NOP 
RTS PC ; RETURN 
s Teel do TEST PORT INTERACTION FROM PORT Be 
: ATE TEST PORT INTERACTION FROM PORT 'B’ 


i SVERIFY THAT THERE IS NO INTERACTION BETWEEN PORTS. 
A. SEIZE THE DRIVE THROUGH PORT ’'B’ BY WRITING O0’S INTO RPODS1. 
8. WRITE 1’°S INTO RPERI, RPER2, & RPERS THROUGH PORT 'B’. 


C. READ res RPER2, & RPERS_THROUGH PORT ’A*. VERIFY THAT PORT 
"A’ SEES O°S FROM EACH OF THESE REGISTERS. 


D. CLEAR RPERI, RPER2, & RPER3 THROUGH PORT °B’. 


WRITE, 1°S_INTO RPERL PORT A’. VERIFY THAT 

PORT *8’ SEES O'S FROM EACH’ OF THESE REGISTE 

F. RELEASE THE DRIVE, THROUGH PORT” a’ eaoN Y THAT THE DRIVE HAS 

Su C THAT THE ATTENTION 17 FOR PORT *A’ Is 
THE ATTENTION BIT FOR 


a RETURNED TOCNEDITRAL AND T THA RE TTHER R ATTENTION BIT Te SET — 


| qegeaseaamaay rammmsasaarmmraaasasnas es sceumacasammeueammartemaanmaemneanenanamaaeL 
4 


palatial ee ded ea ee ee 
m 


le het tte tt Le ee oe Le 


tér 
1st KyBCTL 3 PERFORMING ONLY SINGLE TESTS ” 
L 1 ‘BR IF JUST ENTERED TEST 
IMP EXEC :RETURN & GET NEXT TEST NUMBER 


SEQ Oi42 


N11 
CT SS on TECEbE SOCLONE) (GaN Teer PORT INTERACTION FROM PORT *B” SEG 9143 


cSRyEB. Pi 


“e 






il MOV Me 
ll L 
il 

TEST4e: t 


Sminic ee 


;CLEAR ATTENTION BITS FOR BOTH PORTS 


001274 : MOV TL ; 2°} TEST INDICATOR 
001102 : MOVB 3 
, pas ; ss 
fc $ ss 
" $f s i} 





secerneeneeaas 


1 000010 Move PORTA, RPCS2(RO) ; T T #A 

1 CLR ; T IVE 

1 MOV a1 54 to) 1¢RO) ; CLEAR 

1 MOV ; VE 

1 i MOVB ast S2(RO) ; PORT #8 

i CLR feeds ro amt on ORIV qytROuGH PORT ’B’ 
051 aie nov *RPCS1 ; ME DRIVE 


;SEIZE THE ORIVE THROUGH PORT B 


aalabeldiabesciet 


WONT £Wlrue 





31 
2 
256 
1 MOVB PORT aj T PORT 
i ares Ov POR 3 fF ¢RO sStOR ‘ NG Bort’s ADDRESS 
1 MOV Porta T 3° ITE’ PORT SS 
1 14 MOV e-1, (RO) jL 1 INT RPE 1 THROUGH PORT 8 
1 MOV 8-1, (RO) jL 1°5 INT Re THROUGH PORT 8 
=e Le ee em 
1 1 TA‘ PT ; TO LOCATION FOR TYPEOUT 
7359 i ‘ J pct tags on ; CHECK T _— THROUGH PORT A 
1 eaecd MOV PORT’ + ONBR ; MO ¢ ss TO LOCATION FOR TYPEOUT 
1 CLR tro) AR ON POR 8 
i ER RICROD AR RPER PORT 
rs eis Rr BaRIAPTAEMho, 'SEEMEcIbgeT iON SIT FOR Pont 8 
34 1548 MOV PORTA: PT’ ; Move $ ss T Q LOCATION FOR. TYPEOUT 
7636 1a58 ey e-1' Re RD} it Op 13 ih NTO ere tie TuROueH PORT & 
7837 144 MOV 8-1'RPERS(RO) $L 15,IN To R3 THROUGH PORT A 
14e5 MOVB Ports, (RO) jSELE T PORT B 
7839 051456 MOV PORTB: PT j MOVE ORT ss TO TO LOCATION | FOR TYPEOUT 
7e40 1464 JSR PC, TSt42B ;CHECK T GISTE PORT B 
ree ;RELEASE THE DRIVE FROM PORT B 
1470 rt) PORT , RPCS2(RO) SEL CT 
ates eet BTNBA smove FT aboRESE TO LOCATION FOR TYPEOUT 
051504 000000 aia. CS) CRO) vi Poe "RELEASE THROUGH PORT B 


co THAT ORIVE IS Se1260 BY PORT A WHEN RELEASED BY PORT 8B 


canEEe a: 


Deiste 7 O01 CLR RELERR [Seer "RELEASE ERROR’ INDICATOR 
1$16 O1e737 111) 001124 MOV #ATA!MOL!PGM!DPRIDRY!VV,SGODAT  ; COMP al at CONSTANT 
O0S15e% 012737 O00Cle OOliee MOV #RPDS1 , SBDADR PREGISTER ADORESS’ INCREMENT 


jés-A1l 


iD 


sage ee 


Baaag 
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oa 
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BECP CLerer RT Ar st SUS LLL ERR 


: 


os 


se Re Fe fet ee fe ee Be eb ee ee be me ef tee 










— ek ee a aisle 


CTRLR LGC. MACYJ1 3011046) 
BueNbocz? fsse> : 


ae 
8 


800000 


We -NOV-77 
T4#2 


66S: 


67S: 


68S: 


69$: 


Ble 


TEST WaRt INTERACT ION FROM PORT 'B’ SEG 0144 
I ea are FOR TYPEOUT 
Hh ‘ og OCR ON _F OR TyPEOuT 
; i ae FRok Bont g > FOR TYPEOUT 
ie Lee Tr at raat 
nov Sr age" a eeeleee ti FOR” TYPEOUT 
CMP a ie WITH C 
SREP 


bat REGISTER ERROR 






;RELEASE THE DRIVE FROM PORT A 
MOVB PORTA, RPCS2( RO) jSELECT POR 

MOV PORTA’ PT g TO LOCATION FOR TYPEOUT 
MOV #13, RPCS1(RO)’ nowy Oe sep PRESS, THROUGH PORT A 


; VERIFY THAT THE DRIVE IS IN NEUTRAL 


R RR -CLEAR THE ’ ERROR ’ INDICATOR 
Rov ; THE & RPDS I ron HSPEOUT 
: / 
MOV H ¢ R: ty ae CONSTANT 
Roy : ee REGISTER FROM PORT A. 
a NOENT BITS FROM THE COPY 


ATUS REGISTER FROM PORT 8. 


pont pits FROM THE COPY 
Gis STER THE SAME F BOTH PORTS ” 


i i 
an Gs SOE oe oe 
ve ; 


Ss $ MPO ARE THE SAME: ARE THEY ZERO ” 
Os 

MOV PORTE, PTNGR 0) 3 a T SHOWS DRIVE NOT IN NEUTRAL 

Te! é 4 F Ege uf’ c0 O FROM PORT A. 

MOV ORTA, PT PORT F TEST DRIVE NOT IN NEUTRAL 

nov STHP 3, $80 taal TR. ERROR TYPE OUT 

TST seri a F RTs EQ ZERO FROM PORT B. 

MOV #-1,RELERR 


iSET Ty RELEASE ERROR’ INDICATOR 
MOV #11,RPCS1(RO) ;CLEAR THE ORIVE 


Cle 





CZRJEBO, DL CTRLR LGC MACY11 30(1046) ot NOV-77 17:48 PAGE 14S 
CZRJEB.P11 O4-NOV-77 13:27 T42 TEST PORT INTERACTION FROM PORT 'B’ SEG O14S 
7909 052112 012760 000013 000000 nov #13,RPCS1(RO)  ;RELEASE oe megane ; 
Fall Resta Blase RUZ Bugs 7 Blea senaet CR FOCI ERgRe® we orcs: seo 
7318 east Bis; 001124 001170 50 ae ,STMP2 ‘ee Pde Nee ant a 
2316 138 332 531 2 DOL 718: nov TMP3, aaa } FoR FOR pit FAILURES - FROM PORT B. 
cat 164 1a; 1124 001172 CMP pet dite at ofthe OK Rann PORT 8. 
134 1o4g0? PRROR ? part ERROR 

P31 176 728: NOP ) 
333 525 5001 37 oS2S40 inp TST43 Eo THE NEXT TEST 
ogee ;CHECK THE REGISTERS ON THE SELECTED PORT 
7358 poten “CHECK ERROR’ INDICATOR 
fH eae oF ERROR MESSAGE 
7353 ap T aust TE 
7336 ‘th BR ao) ‘oe ats RecisteR STEN OMPARE RE ERROR INDICATOR 
7358 : Set ell ; oak REGISTER’ 
re es OR ees : ; ne M ERROR 
oai3 ie MOV sTRE, RPCS1(RO) CLEAR T MCPE 
oie CLR CKERR a0) onan CLEAR R THe CH CK ERROR ® INDICATOR 

7 Vv SBPERE, SROAOR iF GrSTER OF ERROR MESSAGE 
7443 AS 6 a i RS 
3320 MP $088, SBODAT i ye feciste 

Erion 

3 COM iD, T OMPARE ERROR INDICATOR 


: 


66S: MOV ex S1(RO) , SBDDAT Seat alt ets ch 
a ae 


Q 67$ 
Rov stre, RPCS1(RO) REPORT, . THE, ERROR 


na 


NN 
in 
- 


67$: 





962 GKERS ;CLEAR THE TENTE OF ER ERROR’ INDICATOR 
7963 MOV R3(RO),SBDDAT’ ;GET CONTENT 
7964 MOV #RPER3,$BOADR ;FORM REGISTER ADRESS OF ERROR MESSAGE 


CZ2RJEBO, DL CTRLR LGC. MACY11 30(1046) — -NOV-77 17:48 PAGE 146 
CZRIEB.P11 O4-NOV-77 13:27 T42 TEST ‘PORT INTERACTION FROM PORT ’B’ SEG S146 


ADD RO, SBDAOR SE ADDRESS 
Py FE secon ie. sTes gray OE 
68s: a KEES ) « at TEN nrg. OF BEC ERROR INDICATOR 
. ee ra! ! 
ee stRE, RPCS1(RO) REPORT NE ERROR 


69S: 
RTS PC ; RETURN 


pteeESESEO EEE RHEE ET RENN ON TERMATE ATIENTION BIT PATH 
: ATES TEST PORT ’A’ ALTERNATE ATTENTION BIT PATH 


: AVERIFY THAT THE ALTERNATE ATTENTION REGISTER READ PATH IS OPERATIONAL. 








is A. SET THE ATTENTION BIT FOR PORT ’A’. 

:# B. SEIZE THE DRIVE THROUGH PORT ’B’ BY WRITING O'S INTO RPDS. 

:# C. READ THE ATTENTION RE REGISTER & VERIFY THAT THE ATTENTION BIT 
7392 :* FOR THE DORI 
73994 Soy 
738 TST geen. ; MING ONLY SINGLE TESTS ” 
7338 Oi 1B ie Hie oreneo sep 

IMP XEC ; Te NUMBER 
8000 1S: MOV 8-1, KYBCTL : ae rToet XTNO CATOR 
B08 ~ Move SteaFi3 "sc te a T S 
MOV aT 1b, sSLPERR i ROR AOORESS 
g004 MOV s25.,.$ in ¢ F 
g00S TEST43: MOV asTack, ; 1 i Rat TOO INTER 
8007 ;CLEAR ATTENTION BITS FOR BOTH PORTS 
8009 MOVB PORTA RPCS2(RO) ; SELECT oe 8A 
8010 CLR RPDS ea ; IVE 
801 MOV 1(R9) ; ch AR 
801 MOV ; IVE 
801 MOVS cSe(RO) ; ae 
8014 CLR ; T IVE THROUGH PORT ‘8’ 
801s Vv ; eh AR 
8016 MOV Ne iF IVE 
Bo! MOVB tie Bie TA 
18 MOV ; T9 oR ORce ATTN BIT ON PORT A 

8013 CLR petal Sere HE ERR 
e020 MOVB 7B, Rpes2c RO) ECE CT HE ORT 
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DL CTRLR LGC MACY 11 30( 1046) ot NOV-77 17:4 137 
l O4-NOV-77 13:2 T43 TEST PORT ’A’ 7 ERNATE ATTENTION BIT PATH SEQ 0147 
052720 cos 000012 1$: TsT RPDS1 (RO) {MATT FOR DRIVE TO RETURN To NEUTRAL 
$6 1e7 g ‘ ooiie2 Ho 26, ‘ 250A REG IF ERROR 
1g 1124 MOV : TA MESSAGE 
1 1166 MO ; MAK TA C MASK 
4 65 COM % C NT IT 
: 2014 4119 HOV PORTE Reczz<Rop 'cSEDEE N ERROR ADDRESS 
1 1 le MO TB, PT ; MOVE TO LOCATION FOR TYPEOUT 
: bois Cle CR OR $1 ¢R0) te 30 
4 O1 1 001126 2S: MOV (RO) sSBpOFT : He ONTENTS” OF THE ATTENTION REG 
1 001166 O01 168 nov Pur CONTENTS In INTO WORKING LOCATION 
36 02373? 001124 001164 cn pia +, ST TMPO ise iret ATTN R Bit FOR DRIVE SET 
053046 PBdoes - ERROR 2§ } ee ERROR 
;RELEASE THE DRIVE FROM PORT B 
13760 001226 O00010 MOVB PORTB, RPCS2( RO) T PORT 
pe30e0 313389 001226 001234 MOV PORT RNBR hove BORF Ab SRese TO LOCATION FOR TYPEOUT 
053064 012760 000013 000000 MOV S RPCST TROD nO oe RELEASE THROUGH PORT B 
;VERIFY THAT THE DRIVE IS IN NEUTRAL 
053072 001250 CLR LERR pr T ASE ERROR * INDICATOR 
O76 eee : 25 001122 MOV Eee ota SOF RPDS! FOR TYPEOUT 
053110 127 011750 001128 Rov. nat ee 7se ISON CONSTANT 
O53 42 1170 MOV sits BO) .3t i iat VE REGISTER FROM PORT A. 
1 il 1164 MOV ; O° 
: bd BIC | 8 BaTariy 3! My iCLEB ts NOENT BITS FROM THE COPY 
154 3 se A109 MOV sre) set" 3; E "ile I STATUS REGISTER FROM PORT B. 
1 il 001166 MOV ST STMP1 iG IT IN TMP 1 
0531 1901 001166 BIC A'UV.STMP1 CLEAR T NDENT BITS FROM THE COPY 
1 1164 001166 CMP stnP0, stMp1 : THE TAT GISTER THE SAME FROM BOTH PORTS ” 
‘ 001164 eo Theo ; 5 TERS ARE THE SAME: ARE THEY ZERO ” 
14 ; T T IN UTRAL NOT SEIZED 
le 053416 ines iBypRss The REST OF THE CHECKS, 
001170 1126 64S: MOV Stne f T ;SET ate Fes Bag DATA HE on SERROR MESSAGE 
00 1 Boi2 MOV TB, ; IZ NG EST SHOWS DRIVE NOT IN NEUTRAL 
001 10 MOVB PORT *RPCS2(RO) ; i T 
DO1 164 Tor st : F StaTus EQ O FROM PORT A. 
901 0012 MOV Bata, PT : ELSING P PORT off TEST SHOWS DRIVE NOT IN NEUTRAL 
wibbees 001126 MOV STHP3, T :? TA’ FORE TYPE OUT 
os N0122e4 O000i10 MOVB ORTA’RPCS2(RO) ; SELEC PORT A. 
05 001 166 TST STMP1 :SEE IF STATUS EQ ZERO FROM PORT B. 
053300 BNE 66S :BR IF NOT 





Fle 






CZRIEBO, OL CTRLR LGC MACY11 30(1046) _O4-NOV-77_ 17:4 PAGE 148 
€2RIEB.P11 O4-NOV-77 13:2 T43 TEST PORT °A’ ALTERNATE ATTENTION BIT PATH SEG O14e 
953302 gie7e 6SS: Mov 8-1, RELERR SC on ne pr ERROR’ INDICATOR 
e078 nov aia’ RPESt (RO) SAE Peat fal 
B08) S332 i 1170 001 66S: fove Twee, T ; OR BIT 22 of WHEN RPDS! READ 
i 13939 Bolze4 OB: MOV CHANGE NUMBE 
8083 0533%; 7 6096 901170 BIC eATA gees, DON’ HECK THE ATTN BIT 
1 BEQ a etek PORT A. 
1373? oB1228 001126 67S: Mov Ae CHECK } FOR BIT FAILURES - FROM PORT B. 
8080 0: S539 dolied poliss ed eA rae cet SL HE on arr B. 
8091 053412 001401 BEQ ; 
B092 053414 104007 ERROR : alee ERROR 
8093 053416 OO0240 8S: NOP 
B94 053420 000004 SCOPE ;LOOP ? 
8096 3 teat ad TEST PORT A LTERMATE ATTENTION BIT PATH 
8097 ; ATES TEST PORT 'B’ ALTERNATE ATTENTION BIT PATH 
80 {AVERIFY THAT THE ALTERNATE ATTENTION REGISTER READ PATH IS OPERATIONAL. 


: A. SET THE ATTENTION BIT FOR PORT ’B’. 

> B. SEIZE THE DRIVE THROUGH PORT 'A’ BY WRITING O°S INTO RPOS1. 
# C. READ THE ATT a a ie & VERIFY THAT THE ATTENTION BIT 
* 


98 
39 

8100 

Bidi 

8102 

8103 

8104 

8105 

8108 FOR THE ORI 

8108 - s SHKSSSLESSESSSRSRERASEKSSSRRKAASSARERRRERARSE SERRA RERAESASERLED 

8109 osavee téray: 

8110 O534e 005737 001274 TST KYBCTL ;PERFORMING ONLY SINGLE TESTS ” 

8111 OS3426 14 BEQ 2s ;BR IF NOT 

Bile 953430 190008 BFL ;OR_IF JUST ENT D TEST 

811 32 1 092602 MP c ; RETURN XT TEST NUMBER 

8114 053436 012737 1 001274 1S: Vv -1,K ;SET SINGLE TEST INDICATOR 

8115 3444 11673? go004s 901192 2s: MOVB 844 Sig tw : TEST R 

8116 12737 74 1106 MOV sTEST44 SLPADR :L LOOP ON TEST ADDRESS 

8117 012737 053474 901110 MOV #TESTYY: SLPERR LOR 00P ON RROR ADDRESS 

8118 OS3466 012737 31 1176 MOV #25. .STIMES : : TTERATI ONS 

g119 053474 012706 001100 TEST44: MOV setade K,SP +7 BAD THE STACK POINTER 

Biel ;CLEAR ATTENTION BITS FOR BOTH PORTS 

8123 053500 113760 001224 000010 MOVB PORTA RPCS2(RO) ; ie cee "6 

£124 le CLR reosit ; IVE 

8125 i O12 if MOV ell, pecs 1¢ : CLEAR 

8126 127 1 MOV abate : DRIVE 

Bie? 053526 113760 12e8 00001 MOVB Pp t ReCS2(RO) : 

Bice 053534 1 CLR Res 1 TRO) ae aoe THROUGH PORT ’B° 

81 40 ea iy oo0000 MOV ail, 1cRO) 31S E ity 

8130 053546 012760 13 900000 MOV B13, RPCSI(RO) ;RELE DRIVE 

8131 053554 113760 o01ece 000010 MOVB PORTB,.RPCS2(RO) °;SELECT PORT B 

€132 063562 612760 177777 O00014 MOV #-1,RPERI(RO) ;SET ERRORS TO FORCE ATTN BIT ON PORT B 
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MACY1 30( 1046) O4-NOV-77_ 17:4 4 
13:2 Test POR? *B ALTERNATE ATTENTION BIT PATH SEG 0149 


000014 CLR RPER1 (RO) ;CLEAR THE ERRORS 


po65i2 — 18: reve Roost {ROS baits “DRIVE 10 "Br Bor! TO NEUTRAL 
Q 1$ iBRIF : 3 E12E0 D TB 


TTN REG IF ERROR 


001122 MOV eRP : 
iL ) ; T 
1535 $0i tee MOV 1 STMPs : MAK TAC MASK — 
1166 COM sine + COREL NT 
901110 MOV aes H ADDRESS 
1224 1 MOVB ta, (RO) pSELE T 
oo iees O01234 MOV PORTA, PT ; MOVE T RODRESS TO LOCATION FOR TYPEOUT 
1 1236 MOV PORTA SEI T ; SEIZED’ ADORE SS 
9000 12 CLR 1tRO) SEL HE Rien HROUGH PORT A 
16 OO01126 2S: MOV (RO), SBODAT ; HE CONTEN $, OF ms wBTTENTION REG 
001126 001164 MOV T $tnPo :PUT CONTENTS I WORKING LOCATION 
001166 001164 BIC sTMP1,§ a :CLEAR. OT HER 
001124 OO1164 cH t\$T ise iF ar N BIT FOR ORIVE SET 
a ERROR 53 + REPORT HE ERROR 
;RELEASE THE DRIVE FROM PORT A 
oo12e4 990910 MOVB PORTA,RPCS2(RO) ;SELECT PORT A 
001224 1234 MOV PORTA’ PT ;MOVE PORT ADDRESS TO LOCATION FOR TYPEOUT 
000013 000 MOV #13,RPCSI1(RO)’ ;ISSUE RELEASE THROUGH PORT A 
;VERIFY THAT THE DRIVE IS IN NEUTRAL 
001250 CLR RELERR ere THE RELEASE ERROR , INDICATOR 
: l2 001122 Vv af 1 RPOS1 FOR TYPEOUT 
reese 001124 MOV art : ’ eel esa CONSTANT 
73 wae eae ig a Seip as: ve" REGISTER FROM PORT A 
reas 001164 v Sra a7 ; * ae , 
001 001164 Bic satay $7 iC NOENT BITS FROM THE COPY 
i 019 MOVB PORTB $e LECT POR 
1 1172 MOV RPOS1(RO). §T 3 : HE BRL STATUS REGISTER FROM PORT B. 
001172 001166 MOV STMP3, STMP1 ; COPY I O °STMP 
190106 001166 BIC BATAIVV.STMP1  :CLEAR PORT T DEPENDENT BITS FROM THE COPY 
1164 001166 CMe $I st iF STATUS REGISTER THE SAME FROM BOTH PORTS 
001164 ret Steeo ‘Re Rec! STER ARE THE SAME: ARE THEY ZERO ” 
ERROR hs N NEUTRAL OR NOT SEIZED 
SY IMP 68s THE CHECKS 
0011 001126 64S: MOV STMP2, opaT DATA FOR ERROR MESSAGE 
00 1 gee 001234 MOV PORTB,P oe: TF EST SHOWS DRIVE NOT IN NEUTRAL 
0012 000010 MOVB PORT RPE RO) ae 
001164 Tot tH F srarus EQ O FROM PORT A. 
001224 001234 MOV Bata, PTNBR Se} ING en F TEST SHOWS ORIVE NOT IN NEUTRAL 
001172 O01126 MOV $TMP3' SBDDAT DATA’ "FOR ERROR TYPE OUT 
001224 O00010 MOVE PORTA; RPCS2(RO) tSECECT™ PORT 
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THY TEST PORT 'B’ ALTERNATE ATTENTION BIT PATH 
TST srr SEE IF agratus EQ ZERO FROM PORT 2. 
65S: : Lie OR’ INCICATOR 
. Vv fit: BBR ERR Ro ' ee 
- 3; RPCS1(RO) ; RE 
: Vv TMP T 4 mf N RP 
66S nov 3 Pe. $8008 ed att aie URES WHE DSi READ 
BIC BATA $tnPe Aol ee K THE EF BIT 
CMP $GDDA , STMP2 ALL BITS ok 
BEQ b I FROM PORT A. 
ERROR 7? T 
67S: MOV STMP3, SBODAT :REPOR 1 Bet oR BIT FAILURES - FROM PORT B. 
Bey perandrnes, Sow ceete etn ar 
ars gated! :BON iF K FROM PORT B. 
BEQ 68$ :BR I Foe 
ERROR 7 REPORT ERROR 
68$: NOP 
SCOPE ;LOOP ? 
IMP SEOP :GO TO END OF TEST 


3p SAE EE A ae a EERE REEE RELA ARERR EA EASE RREE SEES 
-SBTTL ### SPECIAL TESTS FOR THE M7775 (°OP*) BOARD ### 
5 RRR RRR ERE E SEAR EEE RAE REAAERAAASEREA ARREARS REESE ERTS 


. “aa. aa es that ftooum ioe eee 
; ATES TEST NO TIMEOUT THROUGH PORT ‘A’ 


: AVERIFY THAT THE T 2 i Be S_ NOT TRIGGERED WHEN THE ORIVE 
SWITCHES PORT IZING PORT PERFORMS NO REGISTER ACCESSES. 


SEIZE THE DRIVE THROUGH PORT ’B’ BY WRITING O’S INTO RPOS1. 
SET PORT REQUEST BY WRITING 0°S INTO RPOS1 FROM PORT ‘A’. 
Has Sul cHED COMMAND FROM PORT "Py VERIFY_THAT THE DRIVE 
3 QO THE OTHER PORT AND THAT THE 'ATA’ BIT DID NOT 
"B’. REGISTERS WILL NOT BE CHECKED THROUGH PORT °°. 


0. wart THE T * i INTERVAL + 25%. VERIFY THAT THE DRIVE HAS NOT 
BEEN RELE . 


E. RELEASE THE DRIVE THROUGH PORT ‘A’. Y_ THAT THE DRIVE 
RETURNED TO NEUTRAL AND THAT NEITHER A TENTION BIT IS SET. 


TS = ‘augue saan au iuaamaiar casi caine ee nee a: 
y 

131 KYBCTL pe Te nor ONLY SINGLE TESTS ” 
BB? 73 : F JUST ENTERED TEST 


JMP EXEC RETURN & GET NEXT TEST NUMBER 
1$: MOV #-1,KYBCTL ;SET SINGLE TEST INDICATOR 


Ce 
D 


oO ®D 


—- 
uP. TTC eee ees Y 


SEG 9150 


Tle 
Oat TRGSnouse7 Taseet FOCTONE) GE NOW" Test NO TIMEOUT THROUGH PORT ‘A’ Seo 2161 
054332 112737 OO0004%S O01102 2s: MOVE #45, STSTINM TEST NUMBER 
Bevaue is7a7 Gedaes OOl1I0 Hov srEsr Ye" $LPERR iL Q0B LOOF ON Eada apeRe es 
4 61336 801100 sents TESTYS: MOV setae Srints Bao iEEBALION BoINTER 
? 
sere 


;CLEAR ATTENTION BITS FOR BOTH PORTS 


4 24 000010 MOVB TA. RPCS2(RO) 
Be Beanie CLR RPOS1 RO) SEIZE rh Bene 

u4Oe OL 900013 ta nov $13’ RPC {ROD Tes ve CLEAR 
OS4414 ps7 68 1226 10 MOVB paste Geese Ro) Bet Re THe 86 
oS4422 005060 o0001e CLR RPDS1 RO) :SEIZE THE DRIVE THROUGH PORT ‘8’ 
OS4426 012760 000011 ocp0000 MOV #11,RPCS1(RO) iS E OR CLEAR 

4434 012760 000013 900000 MOV B13;RPCSI(RO) ;REL DRIVE 


5 REESE SESE E EEE EASE EE REE EEE TEESE EEE EES 
;SEIZE THE ORIVE THROUGH PORT B 


OS4442 113760 001226 000010 MOVB PORTB, arta st «SELECT PORT B 

44 013737 OO0le26 001236 MOV PORT B geizPr ; IZING PORT’S ADDRESS 
OS4456, 000012 CLR RPOS1 
O5446e 013737 O01224 1240 MOV A, OPPRT i"OprosiTE® p PORT ADDRESS 

44 113760 001224 010 MOVB PORTA’ RPCSe (RO) ORT 
054476 013737 OOlece4 001234 MOV PORTA; PTNBR omove PB PORT ADRESS TO LOCATION FOR TYPEOUT 

= SSASSSRSRERSSSSSSSRSRSRERSSASKERESEKERSRRARRRARLAARSRAAERARSLARLES 
iéeT REQUEST THROUGH PORT A 

OS4¥SO4 o0S060 oDn0ie CLR RPDS1 (RO) T REQUEST | FOR PORT A 
OS4S10 113 760 O01e 000010 MOVB PORT BEC (RO) ;SeLeCT 

4516 013737 OOle2 001234 MOV PORT Ov Tt ADRESS TO LOCATION FOR TYPEOUT 


SHAREAAAASSAARSASEAAAAARSSASAAAKAARSRARKAEAARSHRAARARARARRKAAAALLER 
RELEASE THE DRIVE THROUGH PORT B 


OS4Se4 012760 000013 000000 MOV #13,RPCS1(RO) ;RELEASE DRIVE THROUGH PORT B 


5 +s SRSSRSASSASSSEAEKASESSSAAKRASAASSRARRALSARHESKSHAAHRAARRRRARALERLLES 
hart THE MEASURED TIMEOUT FOR THE PORT (+ 25%) 


OS4S32 013737 001266 001254 MOV TIMEAP , WATCH ;SET WATCH TO MEASURED TIMEOUT VALUE + 2S”. 


(See or on. eee 
VERIFY THAT THE DRIVE IS STILL SEIZED BY PORT A 


OS4S4O 005037 1 CLR CKERR ; CLEAR THE * CHECK ERROR” INDICATOR 
OS4544 016037 ppa8i2 001126 MOV RPDOS1(RO),$BDDAT’ :GET CONT TENTS OF RPOS1 
os4s 012737 O000le O0112e MOV #RPDS1, SBDADR iFQ ORM REGISTER ADDRESS OF ERROR MESSAGE 
08 001126 ADD RO BoADR RHI 1 ae AD 

4 D01124 CLR S$GODAT tWHAT REGI TE SHOULD BE 
054570 023737 O0112e4 oO0112 CMP $GDDAT,SBODAT :IS THE REGIS 
054576 001402 BEG 66S :BR IF 


OS4600 104031 ERROR 31 : TYPE MESSAGE 31 


Jie 
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CZRIEB.P11 O4-NOV-77 13:27 T4S TEST NO TIMEOUT THROUGH PORT ‘A’ 
8301 oS4602 005137 o01244 _ con CKERR ;SET THE REGISTER COMPARE ERROR INDICATOR 
8303 954610 ca 001244 : ror CKERR ; REGISTER OK ? 
8305 Deel BBdi osses4 IMP is ‘BYPASS REST OF TEST IF NOT 
8306 OS4622e 005737 001254 TST WATCH :WATCH EQUAL ZERO ” 
8307 OS4626 0013 BNE -4 :BR IF NOT 
8309 Laneesseressensusessusensneuseratnztensneatneraenererseeussesess 
8310  AONFIRM THAT THE DRIVE HAS NOT TIMED OUT 
8312 OS4630 013737 OO1224 001234 MOV PORTA, PTNBR ;PORT R FOR TYPEOUT 
Sy Giese MEO BIEN cscs § © RB cngnsgponr’ aGey cOnENTS Geceposl Tune 
8315 Oee50 18737 le OOliee MOV wRPDSI, SEOAOR ;FORR REGIS TSIEN A ROBRESS. be ERROR MESSAGE 
B3is Devers peenay oplicd CCR sab0e" oper Pull “BASE Bee eAOULD BE 
8318 OSHeb6 ge37 37 001124 001126 MP ; T, SBDOAT is THE Rai TER OK ? 
g320 peue 1 soe PEROR 82 + OT PE MESSAGE 35 
8321 954700 doe i 39 001244 od Con CKERR !SET THE REGISTER COMPARE ERROR INDICATOR 
Bel Bin Bie oe 2 E> » Bec H TER 
8325 054714 000137 osses4 IMP is ‘BYPASS REST OF TEST IF NOT 
4 : ; LAASL AEE EASELS AEE EERE EERE REL E LEAR RARE S ARE R ARAL EEE 
8329 ;RELEASE THE DRIVE FROM PORT A 
8331 OS4720 113760 001224 o90010 MOVB PORTA, RPCSE(RO) LECT PORT 
833¢ 054726 013737 OOlece4 001234 MOV PORTA’P vi Bont FT aDoRESS TO LOCATION FOR TYPEOUT 
8333 054734 012760 oO00013 o00000 MOV #13, Rep een) Mone RELEASE THROUGH PORT A 
B33 ; VERIFY THAT THE DRIVE IS IN NEUTRAL 
B337 OS4742 005037 001250 CLR RR ;CLEAR, THE “RELEASE ERROR ' INDICATOR 
8338 O54746 012737 9006 le o01122 MOV BRP OSI A801 HE ADORE SS OF RPDS! FOR TYPEOUT 
Se ie tise, Bie sats Bly RITRROMOR BPR gorronieos conan 
gave oon OL Pade 901170 nov RP xt RO) T D8 fe DRIVE. st Seve REGISTER FROM PORT A. 

es 
e344 055010 sz737 10 0190 Oo e4 BIC, BararCY STH iE hn PORT B Pont 8. NDENT BITS FROM THE COPY 
Sf edt ee ee “iy ah | pomayees 
6 

2348 Oue7 37 190106 001166 BIC #ATA! VV, STMP iE LEAR T DEPENDE NDENT BITS FROM THE C 
8349 eOue 023737 1164 001166 CMe sis st THE wg GISTER THE SAME FROM BOTH PORTS ? 
B361 055056 005737 001164 rst STMPO ihe ARE THE SAME: ARE THEY ZERO ? 
B34 Dee0ee Oodls? ossese GRR aes PSs 5 THe WREST OF THE CHECK a 
8255 065072 013737 001170 O01126 70S: MOV $TMP2 , SBDDAT : BYPRS SIBLE BAD DATA FOR ERROR MESSAGE 
835& O51 013727 OO0l226 001234 MOV PORTS, PTNBR SEIZING. o3at IF TEST SHOWS DRIVE NOT IN NEUTRAL 


aa 
oy 


4 
=R 


meek cyinca a 
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rata 
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13:27 T4S test’ NO F MEOu 4 }PZoucH PORT ’A’ SEQ 0162 
901226 000010 MOVB PORTB,RPCS2(RO) ;SELECT PORT B. 
1164 rot THPO" i SEE JF sratus EQ O FROM PORT A. 
0012 1234 MOV ss ra, PTNBR :SEIZING PORT IF TES DRIVE NOT IN NEUTRAL 
301 72 001136 MOV sin tt $80087 3? TA’ FOR ERROR PE PES 
001224 10 MOVB (RO) ;SELECT PORT 
001166 TST sin : SEE iF eoATUS EQ ZERO FROM PORT 8B. 
BNE :BR_IF NOT 
77777 901250 71$: MOV a7} REL ;SET ’ ERROR’ INDICATOR 
b00011 MOV #1; ReC : CLEAR IVE 
000013 9000000 MOV ap ;RELE Raon ne seac 
ERROR :T 2 
001170 001126 72S: MOV ;LOOK BIT ERILURES S WHEN RPDS! READ 
go1ee4 001234 MOV ce ; CHANGE OB ORT 
1124 001170 CMP 7ALL Bits OK sane 
BEQ :BR IF OK FROM PORT A. 
ERROR ;REPORT ERROR 
001172 001126 73S: MOV - mp3. $ ; CHECK 1 FOR BIT FAILURES - FROM PORT 8B. 
001226 001234 MOV PORT BP RoR 3C PORT NUMBE 
001124 O0117e CMP pat,$ :SEE IF READ OK FROM PORT B. 
BEQ :BR IF OK 
ERROR ;REPORT ERROR 
74S: NOP 
1S: SCOPE ;LOOP ? 
: itect % TeST NO TIMEQUT THROUGH PORT BS 
s ATES TEST NO TIMEOUT THROUGH PORT ’B’ 
:#VERIFY THAT THE TIMEOUT ONE-SHOT IS NOT TRIGGERED WHEN THE ORIVE 
i SWITCHES PORTS AND SEIZING T PERF NO REGISTER ACCESSES. 
is A. SEIZE THE DRIVE THROUGH PORT ’A’ BY WRITING O’S INTO RPDS1. 
i B. SET PORT REQUEST BY WRITING 0’S INTO RPDS1 FROM PORT ’B’. 
t# 6C. A RELEASE COMMAND pron PORT "Or VERIFY THAT THE DRIVE 
;# ITCHED T9 TO, THE OTHER PORT AND THAT THE 'ATA’ BIT DID NOT 
i# oeF FOR P REGISTERS WILL NOT" BE CHECKED THROUGH PORT ‘8’. 
:# D. WAIT THE TIMEOUT INTERVAL + 25%. VERIFY THAT THE DRIVE HAS NOT 
i BEEN RELEASED. 
t# 6€. RELEASE THE ORIVE THROUGH PORT 'B’. VERIFY THAT THE DRIVE 
i D TO NEUTRAL AND THAT NEITHER ATTENTION BIT IS SET. 
Stiles ccpriiens cane roremreceaeas cau ¢ ceca 
001274 TST KYBCTL RFORMING ONLY SINGLE TESTS ” 
BEQ 23 NOT 
BPL £ ie IF JUST T ENTER D TEST 
ogeege IMP XEC TURN & NEX TEST NUMBER 
177777 001274 1S: MOV #-1,KY cr SE, SINGLE TEST INDICATOR 
46 001102 2s: MOVB #46’ $15T INGLE 
055330 001106 MOV aTEST4E, $1 PADR ‘LOAD LOOP ON TEST ADDRESS 
055330 001110 MOV sTEST4Y6;SLPERR :LOAD LOOP ON ERROR ADDRESS 
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8414 $330 12706 
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es sa 
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gist Gees Oleved 
suze | 
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8431 OSS4I10 413789 
ay 4 7. 
B33 Qeeies Oo8060 
Bigs Geese 113780 
es 

8438 

eis 

B44] Ss o0S060 
B44e OSSHSE 113760 
8443 OSS464 0137237 
Say 

ay4e 

ee 

8446 oSS472 6127 
B44g 2708 
84SC6 

a 

84S3 oss5500 

Buea 013737 
ByYcs 

aie 

8458 OSSSO& 005037 
8459 Qepels Bt 
6460 S' 1 
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Test No TIMEOUT tmoucH PORT ’B’ 


MOV #4. STIMES ;;00 4 ITERATIONS 
MOV astack, SP :LOAD THE STACK POINTER 


;CLEAR ATTENTION BITS FOR BOTH PORTS 


Move PORTA, RPCS2(RO) ;SELECT PORT #A 
Soy SITAR cng) FREES DAVEE Ean 

MOV #13. 1tROD ; BRIVE 

MOVB te S2(RO) ; #8 

CLR tRO) : T IVE THROUGH PORT ‘B’ 
MOV ail, (RO) : CLEAR 

MOV @13,RPCS1(RO) ; DRIVE 


9 Ab A A a ab a ae a a a a daa aa a ES 
;SEIZE THE DRIVE THROUGH PORT A 
MOVB PORTA (RO) ;SELECT PORT A 


MOV PORTA, f T ;st SEIZING PORT’S ADDRESS 

CLR tRO) sWRIT 1 

MOV ’ T ;? IT * PORT ADDRESS 

MOVB PORTB, cSe( RO) : C FORT Q 

MOV PORTB, PT ; MOVE ADDRESS TO LOCATION FOR TYPEOUT 

KEELES EREERERE CHEABSRREHARSEKRALEBRREHRERSREFHEHRRHRES REEDS 
HROUGH PORT B 


:4ET REQUEST T 


5 eeeeRe 
: RELEASE 


5; RRREER 


CLR (RO?) ;SET REQUEST FOR PORT 8 
FOVB BORTA RPCS2(RO) , LECT PORT A 
MOV PORTA,PTNBR ;MOVE T ADDRESS TO LOCATION FOR TYPEGUT 


Me Me He ae He He A Hae Ha aa EEE EEE EE ERE EE 
THE DRIVE THROUGH PORT A 


MOV #13,RPCS1(RO) ;RELEASE DRIVE THROUGH PORT A 
bshabet-5-4-5:3-4-5-tab-+-5oh-5-Sat-tal-5-4-tah-hgh-tab-5-5-4-lehrindas-+-Soliciahahahalahabatniaiahaiatalelaiaiaiel 


:WAIT THE MEASURED TIMEOUT FOR THE PORT (+ 25%) 


5; ReRREH 
> VERIFY 


66S: 


MOV TIMEBP , WATCH ;SET WATCH TO MEASURED TIMEOUT VALUE + 25% 


RRAKKEERSAAERRKREAKRASASSALERAKRAEARELASSRARASRRSSKARSKERARALEE 

THAT THE DRIVE IS STILL SEIZED BY PORT B 

CLR CKERR ;CLEAR THE CHECK ERROR’ INDICATOR 

MOV (RO) T’ -GET CONTENTS OF RPOS1 

MOV 1 ;FORM REGISTER SS ERROR MESSAGE 
ADD ;ADD_RH 

CL s WHAT 

CMP SGDDAT,SBDDAT ;IS THE REGISTER OK ? 

BEQ 665 BR OK 

ERROR 31 : TY MESSAGE 31 . 
CoM CKERR !SET THE REGISTER COMPARE ERROR INDICATOR 
TST CKERR :REGISTER OK ? 


SEG 9154 
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CZRIEB. P11 O4-NOV-77 13:27 T46 TEST NO TIMEOUT THROUGH PORT ’B’ SEG 0155 


.+6 
rr] 1 i Ss IF NOT 
Ee ees feo SSteee a Era Bale? 
Birk Baer BBS me see ft 
8474 ONFIRM THAT THE DRIVE MAS MOT TIMED OOTnnanaannne 
: AONFIRM THAT THE DRIVE HAS NOT T OUT 


OSSS76 013737 001226 001234 PORTB, PTNBR ele NUMBER FOR TYPEOU 
cu RR’ ? INDICATOR 
io 1 901126 v (RO) ca 
& OG 001122 MOV ei REgte ae OF ERROR MESSAGE 
11 eck 

a 023737 001124 001126 CMP ee ee tx ar87eR SHOU 
OSS646 005137 001244 COM CKERR bit “ims REGISTER COMPARE ERROR INDICATOR 
Seebes 882539 001244 — ner CKERR ;REGISTER OK ? 
055660 001402 BEQ +6 :BR IF OK 
OSS662 000137 OoS6222 IMP is :BYPASS REST OF TEST IF NOT 


5 aE aE a aE ko ab a A a a Ha a a a a aaa aa aa EE EE 
;RELEASE THE DRIVE FROM PORT B 


613999 ale is Bor es4 Move PORTE: PT — nove BORT AabDRESs TO LOCATION FOR TYPEOUT 


SOUP USER Da GRATER OREECRIOER SBI Ce 
Rn 
of 


O0SS702 012760 000013 o00000 MOV aU ae ; ISSUE RELEASE THROUGH 
; VERIFY THAT THE ORIVE IS IN NEUTRAL 
955710 905037 001 CLR RELERR iCLEAR THE RELEASE ERROR ’ INDICATOR 
14 Ol o l2 001122 MOV af 1, SBORDR ;FORM Ty A OF RPDS1 FOR TYPEOUT 
as i 1 B8b4is FOV abe Pam ; igri eye. RISOR e CONSTANT 
1 1130 MOV RPOS tO) TMP2 ae ne BRIE st STATUS REGISTER FROM PORT A. 
1 1 1164 MOV 5 S i N TMPO’ 
Os : 64 B Ce sare CH MG, BR NOENT BITS FROM THE COPY 
851 1 ? v T TPS LEC VE STAT GISTER FROM PORT 
esi2 1 Oori78 001 166 Vv real bet 38 Me 5 fate 23th 9 — as 
851 1 001166 BIC W, STMPL ; CLEAR NDENT BITS FROM THE COPY 
go14 14 37 001164 001166 CMP STHPO :IS THE POT ATUS PREC TSTER THE SAME FROM BOTH PORTS ” 
Eat pepnss ioe 001164 Bas sito eas ARE THE SAME: ARE THEY ZERO ” 
Eat 1 4 ERROR #6 iRe PORT ORIVE NOT IN NEUTRAL OR NOT SEIZED 
8520 1 37 061170 001126 70S: MOV sine DAT er Mt af FF fe DATA FOR ERROR MESSAGE 
8521 1 1e26 001234 MOV Sern E121 NG PO 83 a BST CHGS SHOWS DRIVE NOT IN NEUTRAL 
956054 13760 1226 000010 MOVB poRTB RPCES(RO) i SELECT 
852 baz 1164 TST IF STATUS EQ O FROM PORT A. 
8524 OS6066 00141 BEQ sy BR IF ZERO 


CER TER CTR eon Tray cto oY Fe sr ha Fimcout Ho, PORT 'B’ SEG O1S6 
1 





ot v PORTA, PTNBR ING PORT IF TEST SHOWS DRIVE NOT IN NEUT 
Ss ST 8 oO ll id 
Ji 7 
rst Pa TATUS EQ ZERO FROM PORT 8. 
77777 MOV 1, REL RR : ERROR’ INDICATOR 
i a, (imei MES, Ave 
ERROR :T 
gen 001170 931358 2 AgY Sure, ‘poet ;LOOK FOR BIT PRILURES WHEN RPDSI READ 
' . 
es a a ete ST Eee 
g239 001172 1 73S Rove MP3, creck FOR BIT — FROM PORT B 
: : * ° 
8540 nese nate MOV rne3, 
B54 001124 001172 CMP — STMP3 ELF oe READ OK FROM PORT B. 
ERROR Be j 
954 PORT OE RROR 
S44 74S NOP 
aS4S 
gays 1S: SCOPE ;LOOP ? 
Bove .SBTTL END OF PASS ROUTINE 
Bo30 H MINGREMENT THE Pegs MUMGER(BPRGS) 
gees He: are “pre. OF “PROGR Ret SR" R 1 PASSES THRU PROGRAM 
Bees ts RURBER OF "OF ERRORS Tee nce LAST REPORT YYYYY 
$s ie T oh TOR G TY ARE be CinaL 
BS58 «IF THERES 18 am SURE $8 t TSTI1AA 
8s enetis 
8553 001274 ag KYBCTL ENTERED T TEST VIA KEYBOARD COMMAND ? 
856 EXEC TURN K YBOARD CONTROL 
Bsbe 11 CLR TSTNM + RO T ST 
1176 CLR Times 33 T NUABER ITERATIONS 
8564 11 INC AS :: INCREMENT THE PASS NUMBER 
esee 100000 001100 IC ® go000,$PASS + ;;D0N’T ALLOW A NEG. NUMBER 
856 SEOPCT: .WORD 
gore BGT + 5 YES 
B53 aaah MOV (PC) +, a(PC)+ ::RESTORE COUNTER 
857 OPCT 
6578 056302 $e 65S ; TYPE ASCIZ STRING 
BR = LiGeT OVER THE ASCIZ 
Boz iiss: PASCIZ <12><15>/END PASS’ s 
8576 001100 MOV SPASS, -(SP) SPASS FOR FOR TYPEOUT 
8578 TYPOS o TYPE =DEC IMAL ASCII WITH SIGN 
857 058334 TYPE 67S free C1IZ STRING 
8580 eR 66$ T OVER THE ASCIZ 





78° r oe Le macy) s 30( 10%) O4-NOV-77 17:46 PRGE 157 
V-77 13:2 ENO OF PASS ROUTINE 


i878: -ASCIZ 7 TOTAL ERRORS SINCE LAST REPORT / 


76 
gu Beea7e 013746 001112 SERTTL,-(SP) GM. re cyarour 








3c6 . me Il WITH § 
Bee 1207 ty F ae cine Fe 
BSE 1g CLR RT L 
3S.8E SGET42: MOV 84 ot #50 
= >.6 T : ; 
32 D SENDAD: J PC, (RO) 3 RORTTOR 
a. NOP 1d 
8s9s _ 0 SDOAGN: . 
85% 0 IMP a<PC)s ; ; RETURN 
8537 $RTNAD: - WORD STIAA 
e338 377 000 NULL : - BYTE 1,-1,0 ;;NULL CHARACTER STRING 
8600 : 
geek H ; SHRSSSLSSSSSSLEKSALSSALASHLAKASASLHLAERAAEASAHRAAAARAASRLA AES SES 
ons .SBTTL #8## SUBROUTINES ### | 
860S pa a ab aE ab ab a a a ab a a a a a aaa aaa a a aaa aaa a aa aaa aaa 
8607 
;ROUTINE TO CHECK FOR KW1I1-L KW11-P CLOCK 
Bo08 :IF CLOCK is PRESEN . the ctoek WILL BE LO SATED 
e512 514 O00004 CKCLK: nov scx K aQgeERRVEC ae VECTOR FOR CLOCK CHECK 
861 ¢ T K sCHECK F KW11=P 
Beis MOV K* (R14 Se at KES IOP i 
Bis BERN eg fo cit rren wary 1:5 
B61 600135 155238 MOV site KC : T CLOCK - chy , 16MS, CONT INT 
p0000% CKCLK1: ADO noon TACK POINTER 
1 000004 MOV scke K2, @¥ERRVEC j 4 VECTOR TO CHECK FOR KWLI-L 
2 MOV Sy RL sKuLh VE Cra RooREss 
378 nov 53 KC 1)+ ik Ki d=L CTOR 
100 122444 MOV 00° a8. Ss , T KWL1-L INTERRUPT 
St p90082 CKCLK2: ADD oh TncrenenT Re HE STACK POINTER 

Be ‘ 48 O000004 CKCLK3: nov ag, * JBERRVEC ects THE TURN, VECTOR 
ie 
8633 ;ROUTINE TO COUNT CLOCK TICKS 
8635 OS6576 062737 O0002i 001252 CLOCK: ADD #17., TIME ;ADO 17 MS TO ELAPSED TIME COUNTER 
8636 OS&E04 005737 B01 264 TST WATCH :IS WATCH ALREADY ZERO ” 


CZRJEBO 
CZ2RJEB. 
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# SUBROUTINES ### 


098 


N Qownnn—o 
ee 
“ 


N 
£ 
£ 
-— 
tn 
tf 
- 


00002 i 
0012S4 


Boooos 


040000 


001103 


001254 


i22240 


BE 1S ; ie dt 8 
#17. , WATCH : T 17 MS FROM WATCH DOG COUNTER 
1 3 pid NOT MINUS 
CL TCH !CLEAR WATCH DOG COUNTER 
1S: RTI ; RETURN 
;ROUTINE TO CALCULATE + ANDO - 25% TIME TOLERANCE VALUES 
TOLER: sus a SP pee STACK ; 
BY a sci ee tae 
HOV (3P) ,6(8P) : v AGAIN 
ASR (2p) pty BE 5 IN (FOR A TOTAL OF 4) 
a0 (SP) 4(SP) > CALCULA ULATE U R R LIM FOR TIMEOUT 
(5P)4,4(SP) pone T FOR TIMEOUT 
RTS RS URN WITH TOLERANCES ON THE STACK 
Nene ts Ltd kabakabalahalaialalalahalabaiahsiabaiabaiaisiaicielal 
.SBTTL 'SYSMAC’ UTILITY ROUTINES 
Need 11d hk kak atadabahahalabalahaliahaiabaiehaiahaiabaieheleicieicieiel 
.SBTTL SCOPE HANDLER ROUTINE 
; snAS UTS GoeTMaeD tetra eh omtee Dish Hee BTSEEAT 
ae L t fest poe Pe Haig a BISPLAY t ATSpeneN 20>) 
a1 a CH I cgi thE _ 
:eSW1l=1 TheBty : RATIONS 
—. L ON 
14 SCOPE ; ; SCOPE=IOT 
SSCOPE: 
CKSUR 5s TEST of OR CHANGE N SOFT-SWR 
1S I seit, aSWR B5L SENT TEST? 
BNE VER reyes IF SW1I4=1 
-geeeeSTART OF C FOR THE XOR te Reesse 
$xTSTR: BR , i ae ne HES XOR” TESTER CHANGE 
MOV a ) ONT NTS OF eae ERROR VECTOR 
i ala er irae 
nbv ( DaASRERRVEC 
BR SSVL fm ae 
Ss: CMP (SP)+, (SP)+ HH Sic tee @ A TIME OUT 
oy ‘ +; @BERRVEC Ht one 
ERROR. v test 
6$:;8eeesEND OF é FOR THE XOR™ +E ore Recens 
2s: Tet 8 SERFL ; HAS GN ERROR OCCURRED? 
; i iBR IF 


SEG 0158 
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CZRIEB.P11 O4-NOV-77 13:27 SCOPE HANDLER ROUTINE SEG 0159 
8693 001115 001103 cNee SERMAX,SERFLG 5 ;MAX. ERRORS FOR THIS TEST OCCURRED” 
Bb95 001000 122154 Bit ‘ 1T09, aSWR 4 p-ON ERROR” 
eae 001110 001106 7S: MOV SLPERR, SLPAOR ii BB LOOP ADDRESS TO LAST SCOPE 

011 4: LRB THE ERROR 
B38 101176 CLR ines Ge NUMBER R OF ITERATIONS TO MAKE 
8 BR 1 + Scare = xT TEST 
8 004000 122122 3s: IT IT11, 9SWR $5 ee Tete T ITERATI 
g 001100 S 
8705 BEQ ERAT Ons 
ae BUR coum Hag nen HBS 1 FAR ons woe 
87 BGE its ie BuTReS 





0011 
’ ’ 1 
8709 OS 1 1104 1S: MOV ai NITI fERA ON COUNTER 
8710 nad g1s335 iat oii Fe MOV He NSTIMES Se hareeh TONS TO DO 
871 052 0011 SSVLAD: INCB $1 thea 
871 ll D011 MOV rSLEAOR HE L Ss 
Bria pezoe. bbe 501200 CCR i THE ESCAPE SBRROR ADDRESS 
8715 057076 ii ? po bsor 001115 MOVB al 3} ALL (1) ROR ON NEXT TEST 
eri Berite Blarie Belige Seo? SOMER: Fey hoe Pict ne thin AOORESs 
8718 057116 RTI . 33 
e713 657120 ono0o4 SHXCNT oe eens ened ::MAX. NUMBER OF ITERATIONS 
8721 
hs {ATHTS ROUTINE ICC INCREPENT THE ERROR FLAG ANO THE ERROR COUNT 
a7e4 : Te ERmon Ten EER OnoRESS OF OF THE ERROR CALL 
g726 TOS 2,10, "50% ie BY THIS ROUTINE ARE: 
$ = HAL 
8728 : a 1351 INHI6 T RROR TYPEOUTS 
5/8 sea - 
B7 1 i ERROR N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 
8733 O0S7122 SERROR: 
8734 O57lee 104407 CKSWR ;; TEST FOR CHANGE IN SOFT-SwWR 
Ea 2 eee ae a Raa ee 
WU 4 
ei ge ce or wr {Bol ar incea Rd eR 
+3 ie 
Bs Brine Barr SBMGE 18104 cry SefT0:9049"* Ls rfacn! 
874 7186 901 TYPE LL ae 
874, 71 lil 1S: INC L RRORS 
e743 O37 1e38 1 ego ov ( ) SERRPC ss gunee ERROR” INSTRUCTION 
es 
8745 7 1? BO1414 MOVB a SERA 1TEMB arate onevt THE ERROR ITEM CODE 
87 057 7 121724 BIT r 3,2 He TY F 
8747 057214 001004 BNE 208 ::SKIP TYP outs 
e74@ 057216 004737 057254 ISR PC, SERRTYP ::GO TO USER ERROR ROUTINE 


OL CT 
1 


RLR LGC 


001207 
121706 


os64e4 


001207 


001114 


001116 


macys 30( 1046) 
O4-NOV-77 13:2 


oooo4e 


El3 


DON MANDLE f oor PAGE 160 
ERROR HANDL 


20S: 
es: 


3$: 


6S: 


RET 
.SBTTL ERROR MESSAGE TYPEOUT ROUTINE 


TINE 
, SCRLF 


SSENDAD, de42 
6$ 


R! 
FOR CHANGE IN SOFT-SWR 
T-11 AUTO-ACCEPT” 
H NO 


freee eerie lees The LIEN CONTROL BYTE CSITEMB) TO DETERMINE 


t SERROR 


:#AND RE 
SERRTYP: 


1$: 


2s: 
3$: 


4$: 
Ss: 


6S: 


7$: 


cBBat® 


RLF 
Ad, “(59 


SaSITENB, »RO 


SERRPC, -(SP) 


a(R1)+,-(SP) 
8s 
a(R1)+,-(SP) 


ROL BYTE” (SITEMB) TO DETERMINE WHICH 


ope REPORTED. 11 Then OBTAINS RONCERNING THE ERRORT ene). 


: F CCARR AGE RETURN” 8 “LINE FEED” 
+ BO kur THE ITEM INDEX 

i3TF Tyee Thee M_NUMBER 1S Ze ZERO, JusT 

:} RRPC FOR te eae 

ERROR ADDRESS 

33 G0 1 YPE--0C AL ASCII(ALL DIGITS) 


;GET OU 
; }AOJUST THE INDEX SO THAT it WILL 
WORK FOR THE ERROR TABLE 


R 
MES “ POINTER 
IF NO POINTE 
SAGE” 


+ OUT 
CTAL asc (ALL DIGITS) 


;;SAVE 2(R1)+ FOR TYPEOUT 


SEG 9160 


sn 


: 


F1lg3 


MACYL1 30( 1046) -NOV-77 PAGE 161 
Tore? ERROR Messact +t YPEOUT Rod INE SEG O161 
TYPDS ;;GO TYPE--DECIMAL ASCII WITH SIGN 

Qs: TST (RL) !i1$ THERE ANOTHER NUMBER? 
BEG 9s 3 IF _NO 
os74e4 TYPE ais ii TYPE TWO(2) SPACES 
BR 33h. 
9S: MOV (SP)+,R1 ; ;REST Rl 
10S: MOV (5P)+'RO + RES TORE RO 
001207 TYPE SCRLF !: "CARRIAGE RETURN” & “LINE FEED” 
RTS PC : }RETURN 
000 11S: -ASC1Z ee ::TWO(2) SPACES 


EVEN 
. SBTTL i4PE ROUT INE 


tiqetedoqetetepepettapey 
TOTTI  & 
M-OWOODNOU SL Wl: 


RR 
227? 
28 


Re 
ee 


date 


see 


2 
2 


OO 


SEEEEBeRs 


a 
8 


N 
wn 
w 


AEMUMRROR SS Sage seeeowuRATERS SuN UNIS 


TR RARRRARRARRRR RRR RR RRA 


001157 


OS7E44 


0S7600 
001156 


001154 
006001 


eee eee eee eee tee eee cence MeGanGe MUST TERMINATE WITH AO. 


 KROUTINE TO T 


 eNOTES: 

7% 

3; 

; #OR 

;# TYPE 

+ MESADR 

$TYPE: TSTB 
BPL 
HALT 
BR 

1$ MOV 
MOV 

es MOVB 
i 

60S: MOV 

3$: ADD 
RTI 

4 CMPB 
BES 
CMPB 
ect 
TYPE 
SCRLF 
CLRB 
BR 

S$: JSR 

6$: CMPB 
BNE 
MOW 

7% DECeB 


YPE om 
; THE r edeaio WILL I 
; #NOT 


L 
SFILLS CONTATRS 


T TERMINATE WITH 


fess AO BYTE. 
arieg & MULL, SHARAE TER? AFTER A LINE FEED. 
HE CHARACTE USED AS THE FILLER CHARACTER. 


NUMBER OF PIL LER a REQUIRED 


THE NU 
SFILLC CONTAINS THE CHARACTER TO FILL AFTER 


> #CALL: 
:#1) USING A TRAP INSTRUCTION 
TYPE , MESADR 


BHT, (SP) 
@CRLF , (SP) 
S$ 

(SP)+ 


HARCNT 
gs 


PEC 
SFteLc. (SP 3+ 


2 
SNULL , -(SP) 
1(SP) 


;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


THERE A TERMINAL? 
‘tBR i YES 
*>HALT HERE IF NO TERMINAL 
; LEAV 
SS OF sae STRING 
Bet 4 199 a, | TYPED ONTO STACK 
tE ad vakton TERMINATOR 
F TERMI OR pope IT OFF THE STACK 
STORE RO 
Sust RETURN PC 
ii URN 
$$ H IF <HT> 
;;BRANCH IF NOT <CRLF> 
;;POP_ <CR><LF> Equiv 
AND L 


:: TYPE A CR 
EGET NeXT CHARACTER COUNT 

GE XT CHARACTER 

:GO T THIS CHARACTER 

i318 IT TIME FOR FILLER CHARS.” 
tiT NO GO CA NEX 
;;GET @ OF LLER CHARS. NEEDED 
;;AND THE NULL CHAR. 
:;DOES A NULL NEED TO BE TYPED” 


13 


JEBO DL CTRLR LGC MACY1LI 3011046) O4-NOV-77 17:48 PAGE 162 
JEB.P1L O4-NOV-77 13:27 TYPE ROUTINE SES clée2 
8861 98 40 002 aLT bs : +R IF NO--GO POP THE NULL OFF OF STACK 
B8e3 OSze4e oeas? | be7ENN Bece 4 SCHARCNT” + eS NOT COUNT AS @ COUNT 
Bobs es £98335 BE $f COOP 
Bese :;HORIZONTAL TAB PROCESSOR 
7554 112716 o000 8S: MOVB ACE. TAB WITH SPACE 

Sees pe 737 057600 95: JSR Bc, $tyPEc a SPACE 
8870 0S 4 i3 OS7644 BITB AS SCHARCNT RANCH IF NOT AT 
8871 1372 9s’ :; TAB STOP 
B876 74 726 TS (SP)+ 3; POP SPACE OFF STACK 
887 75 7 BR 2s :GET NEXT CHARACT 
8874 Feo8 1 121344 STYPEC: TSTB aSTPS tS UAIT UNTIL PRINTER IS READY 
8875 057608 100375 BPL STYPEC 
8876 7606 1166 000002 121336 MOVB (SP), aSTPB ;;LOAD CHAR TO SE TYPED INTO DATA REG. 
8877 057614 122766 o00001S o00002 CMPB acR,2tsP) 3415 CHARACTER A CARRIAGE RETURN 
8878 001003 BNE 1$ : BRANCH Lf NO 
3E 105037 0S7644 CLRB HARCNT Ut ee AR CHARACTER COUNT 
8880 76. 000406 eR TYPEX XI 
B68] 122766 o000012 oo0002 1S: CMPB SLF.2(SP) S CHARACTER A LINE FEED? 
B88¢ 0576 001402 BEO STYPEX i315 cue 

OS7642 105227 INCB (PC)+ ::COUNT T E CHBRACTER 
8884 057644 000000 SCHARCNT: .WORD O :;CHARACTER COUNT STORAGE 
gees 057646 909207 STYPEX: RTS PC 
gs8” .SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
gees ; THIS ROUTINE 16 USED TO CHANGE A IG-BIT BINARY NUMBER TO A GDI 
gesc :ATHIS: ROU D TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
ees1 R AND TYPE IT 
B83¢ iiss ethte HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
gE94 : MOV NUM, - (SP) :;NUMBER TO BE TYPED 
segs te TYPOS ::CALL FOR TYPEOUT 
SESE :# -BYTE N ::N=l1 TO & FOR NUMBER OF DIGITS TO TYPE 
ge97 : ‘BYTE M 33M=1 OR O 
Bese : TYPE LEADING ZEROS 
Be99 :# + A CUPPRESS LEADING ZEROS 

ee 7% 
e901 ; #$TYPON-~—-ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
Bons Nt OR S$TYPOC 
; ®CAL 

e904 : MOV NUM, - (SP) ;NUMBER TO BE TYPED 
g30s i# TYPON CALL FOR TYPEOUT 
S09 i SST YPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
e906 ; #CALL: 
6303 ;# MOV NUM, -( SP) ;;NUMBER TO BE TYPED 
e310 1 TYPOC ::CALL FOR TYPEOUT 
e3le os7650 017646 ooocon STYPOS: MOV a(SP),-(SP) ;;PICKUP THE MODE 
6913 057654 116637 900001 060073 MOVB 1(5P);SOFILL 3; LOAD ZERO FILL SWITCH 
8914 057662 112627 O6007 MOvB (SPi+,'SOMODE+1 :;NUMBER OF DIGITS TO TyPE 
SSis OS766E 62716 000 ADD ae, (SP) ::ADJUST RETURN ADDRESS 
BSié 0&7672 950040E BR $TYPON 


CZRJEBO, Di CTRLR LGC 
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C2RIEB. 


1? 
i8 


RUT EE EE RELEE Sau poa ER OOS OTN EE 


Pil 
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060072 
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BINARY TO OCTAL (ASCII) AND TYPE 


STYPOC: eae #1, SOF ILL T THE ZERO he SWITCH 


: +1 T FOR SIx(6) DIGITS 
STYPON: MOVB #5, SOCN ve # ITER TION COUNT 
MOV R3,-(SP) ii88 
MOV RY, -(SP) 
Vv -( ) 18a FS 
nove $0 +1,R4 ::GET THE NUMBER OF DIGITS TO TYPE 
ADO #6,R4 3; T IT FOR MAX. ALLOWED 
MO RY SOMODE +: BUGF tf FoR U USE 
MOV SOFILL,RY ::GET rhe EERO FILL SWITCH 
MOV g(SP) RS ::PICKUP THE INPUT NUM 
CLR 33C THE OUTPUT WOR 
1S: ROL RS j ROTATE MSB INTO 
2s: BSL 23 : #60 00 rite DIGIT 
ROL RS 
ROL R 
MOV RS,R3 
3S: ROL R3 ;;GET L$8 OF THIS DIGIT 
DECB SOMODE :: TYPE THIS DIGIT? 
1 o377770,R3 5 OR ED OF JUNK 
5é ti 9EL, bp 0 
TST RY ::SUPPRESS THIS 0? 
BEQ 3S i BR IF YES 
4$: INC ::DON’T SUPPRESS ANYMORE 0°S 
BIS #'0.R >: MAK: THIS DIGIT ASCII 
Ss: “i MAK I IF NOT ALREADY 
MOVB R3, 6S ::SAVE FOR TYPING 
TYPE ::G0 T THIS DIGIT 
7$: DEC $OCNT :: COUNT 1 
BcT 2 ::BR IF MORE TO DO 
BLT 6$ ;;BR_IF DONE 
INC R4 INSURE LAST DIGIT ISN T A BLANK 
6$: MOV fap), RS + Re Pear Ris 
MOV (SP)+,R4 ; ;RESTORE RY 
MOV ($P)+,R3 8 TORE R3 
MOV 2(SP))4(SP) ::SET THE STACK FOR RETURNING 
MOV (SP)+; (SP) 
RTI ; ; RETURN 
Qs: BYTE 0 :: STORAGE FOR ASCII DIGIT 
"™ &@ :: TERMINATOR FOR TYPE ROUTINE 


“BY T 
OCNT: ‘Bvt ;3QCTAL DIGIT COUNTE 
i ILL: : YTE 2 + ZERO Fie SUP SeH 
SOMODE : -WORD 0 R OF DIGITS TO TYPE 
.SBTTL CONVERT BINARY TO pecrmat.’ AND YPE ROUTINE 


; j SHOPSSSUSEREDEESHEEDREASDESELELESESEEE SEES E ERNE EA SSR EAL SESS AD 
pas ier fee Is USED TO CHANGE A 16-BIT BINARY NUMBER TO A S-DIGIT 
) R_AND TYPE IT. Ast Mat WHE THER 
+ S POS! 11¥8 OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
The FIRS 3 _ OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 


LORE 
: AREPLACED WITH SPA 
7 CALL 


I13 
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NARY 16 DECIMAL AND TYPE ROUTINE 


SEG C1é4 
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DL 
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Oe, 


st 
JE 


zR 
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OU 


awa 
Gono oo oan 


Qa 
-u 
mu 
Su. 
~ 
x x a 
rd & ar 
= _ P= ] e 
Ww) oa ~a. i=) 
Qr- e 
Fs a. wid N 2 
be FF 2S x a) 
z 5 PG xe re: 5 
o “ Wud w — - 
w x Lad - . or 
eg azz — QoQ Woz x - « 
ax HHO go oO az wr o 
. od &- eH ug Ss 4 ua a 
w wo. ss o& &F = -ug o land 4 
oO - YY NHOr- nla Lee heed me oOwnmu-O 
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> - he oaru ma - a MZO0000Z ax 
zo nna OZ 20000 ox~ Ongwai oO wezzzzzun O 
4 renooeare & EFZ oFo HERSESSEY S 
me mqco - - «” ul - 
ay -~ 2 a sete. mW wired =) >” REM rs eS 
- on Yee wewron S4tey or teeH Huw ruweeacarn 
ge ee - - eae errr or 2 
-oO -ae uw =x ju wl OF Tee I OUMWMMUFM 
- ai ma See St ~S oO wt a 
5 = WEFT Wore? OFF ehelige GtoqwoGauMmoSSSSoG 
23 ceceusee ERUACSCS ESE OSEETEERHCSSUSIEMeeeeaes fy 
=~ cml - ~” 
a Qa ™ a ~ 
w - e ~ a- 
~ ~w =a ©¢ = ~ at) wa 
a alee E | 4 aa- oO -~ + ' wou-o ~-W 
> hougao-~ © va = ‘uum oO ~ ae 
' ——ees -_ ~ wn w “~Corr+- uw + QO $+ +H HL + 
- terproes - - a a en! _—-8 en oaaaaaen 
=x eecee ; = = « . a Oo . - a ~maa a 
an o-mu Own- ORs MO—RURA“UMUMMAUIA~= - ULOMMNMUIMR—TNUW 
z eeca UH SE SSeeerTEMCCM~t~HO-BSs2ec-AauMacwo~o aerate wu 
w oO; 
a ie) is) oa @ fe) Oo om ul oo 
>a PrROr>>>>Ij020>>a>Q0rvo Ws JOS WMS bee > FLO > o> >a > > OOO 
o> SELLPL LSS ¥edceeceaaZS w eee nar Oka Oo 4JO0000>0090r000 
ce b = a TELE OZFLTOCLC COL MNOHOt+- Or OCOLlOMOl+ MOL O-MDOEOLLLOLO>+ LCL a-+-- 
Ww ee 
Qa ail 
a a 
» es oo ts es a os os oe ee = 
x“<*x w nad al wa AWM wa La) Qa 
core A - uM a w wr @ o wa 
and wo r 
oO w t. oO 
oO tT w oO 
=) tw . Qo 
ie] i io Oo 
Oo _ _ oO 
wm wo =-O0O0 Le ] t cu 
Su uF 3 oar & fc xo 
mo ™ 888 Oo io moO 
i=) i=) = 28 
3 Se8 8 = 8a 
? sy Sera BROS S23 SSMUYT OODuGB 09 SBLOuAT 
’ =—7Un- V.cur wn an 
oe muy) Oo Mm—-—O 
eee -—O-1-4 O- S ~~ Sesetetet mood 
oO000000 -_ -_ om 888o= 444300000200 oo 
CRBSSSAZAANAMAT F FUDRSSDORARR OSM AUUUMMOOT FRAPS SOR tefots 
od tt dd tt tt ttt roa 
suasadadadausnsaaadausnads 3 3333 
Loa?) 
cum 
ono 
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Set tEREEEEEELEEEEEEvOogGaga0® 


O-MUMTMNW OM 


Se ee bee hee hae ee hee hee bee hee | 


i atotatatatat at ata 
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CZRIEBO, DL CTRLR LGC 
C2ZRIEB.P11 
10 oo0012 
30 868319 600004 
9031 
3035 
3034 
9035 060322 000000 
39036 060324 000000 
37 0326 999006 
38 0330 0001 
3039 060331 
3040 060332 
39041 
3042 
3043 
3044 
904s 
3046 
9047 
3048 
9049 
3050 060332 005037 
39051 060336 012737 
9052 060344 013737 
9053 0603S2 012737 
9054 060360 012737 
9055 060366 90S 
9056 060372 012777 
9057 060400 000207 
3058 
3059 
3060 
9061 
9062 
Bes peoice 41774 
3065 antes b4o7 16 
9066 060412 021627 
9067 O60416 001004 
9068 060420 022737 
3069 060426 001500 
3070 
3595 nated 2737 
3075 Beodae 901004 
9074 O6044O 104401 
2078 O60444 005726 
3077 becuse Dele3? 
3078 060454 0019 1 
DEBYES DET 26 
9081 4 105777 
9082 060470 100375 
$083 O60472 117746 
39084 O6047E 042716 
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120450 
177600 


060324 
060326 
000060 
000062 
120544 


001140 


060322 
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04 
CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


10. 
SOBLK: .BLKW 4 
.SBTTL TTY INPUT ROUTINE 


$3 RERKESLHEESSRASELRRASRESSSLA LE SSARAERAALARRASLRAAAALARALALAARES 


Lsg 

S$TKCNT: .WORD 0 
STKGIN: .WORD 0 

ar T: oe 0 
TKQSRT: .BLK 1 
STKQEND=. 

. EVEN 


;#TK_ INITIALIZE ROUTINE 
:#THIS ROUTINE WILL INITIALIZE 7 


;#SETUP THE INTE OR A 
> #CALL: 
;* JSR PC,STKINT 
3% RETURN 


$TKINT: CLR STKCNT 
MOV #STKQSRT 


MOV #STKSRYV, aS TKVEC 
MOV #200, aatKVEC+e 
TST asTKB 

MOV #100, aSTKS 

RTS PC 


;*#TK SERVICE ROUTINE 

;#THIS ROUTINE WILL SERVICE THE 
;*#BY READING THE CHARACTER FROM 
;#IT IN THE QUEUE. 


$TKSRV: MOVB asTKe -(SP) 
BIC #tC17?, (SP) 
1S: CMP (SP), a? 
BNE 
CMP SSWREG, SWR 
BEQ 5b 
es: 
CMP #1, STKCNT 
BNE 3$ 
TYPE $BELL 
TST tSp)+ 
BR ee 
3S: CMP (SP), #23 
NE 325 
CLR ASTKS 
TST (SP )+ 
318: TSTe asTKS 
BPL 31$ 
MOVB aSTKB, -(SP) 
BIC #10177, (SP) 


s sTARIBER OF ITEMS IN QUEUE 
;; INPUT POINTER 

+s OUTPUT POINTER 

;; TTY KEYBOARD QUEUE 


+; TTY KEYBOARD INPUT 
URN ON THE KEYBOARD IN 


53 
aS 
os 
+s 
: 


mz 
mo 


mm 

oa 

5 
ANsSH4 


AG 
T EY BOARD INTERRUPT 
O CALLER 


INTERRUPT 
FER AND PUTTING 


te 


NPUT 


Case 

se 
AnomT 
53. 


SELECTED” 
HANGE 


KEYBOARD INTERRUPTS 
CHAR OFF STACK 


S_OF THE 
OUTPUT POINTERS. 
VECTOR 


SEG S1éS 


g 
z 
oe 


F 
m 
a 


SRHTHES BOBOR 


8 
B 


sister 


bb bs po 0 pe Bo bo B= Be Bo Be Be 


VER PONS 20 len cu OBIE REORES 


Oe ee be pe ae be ae Be Be Be be be be = he ee 
BIER ESB we 


eee eetee te eDeeteerebelvelvelvevelvemelvelvelvelvelvelververvelvelvervelverys 


£W 
Ow 
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ll O4-NOV-77 13:27 TTY INPUT ROUTINE SEQ O1EE 
060502 2627 000021 CMP (SP)+, #21 ;;IS IT AC CONTROL -G” 
Samat ne eee 29 
1 1 000100 12C426 nov #100, aSTKS $3 TURN TTY KEYBOARD INTERRUPTS 
960322 32$: INC STKCNT 44 CHARACTER 
1 140 CMP (SP), #140 31 ua PER CASE? 
BLT 5s GRAN I Mt 
O21 000175 CMP ), #175 3318 I a Sree AL CHAR? 
Ber ;;BRANCH I 
000040 IC #40, (SP) ; ;MAKE eat CASE 
44 11 177554 4$: MOVB (SP§+, QSTKGIN ;; PUT IT IN QUEUE 
060550 00523? 060324 INC KQIN He T te POINTER 
060554 023727 060324 060331 CMP TKQIN, #STKQEND ;;GO OFF THE E 
001003 BNE % ; BRANCH IF NO 
060564 012737 060330 060324 MOV #STKQSRT, STKQIN iiRESET THE POINTER 
060572 o00002 Ss: RTI 33 
« SSEKLSHESSRRSSASERESERESERSERSSRERARRERESRRESRRRERRREKLELRA REESE 
WARE SWITCH REGISTER CHANGER ROUT INE 
seoine 1 S ENT TEST FoR THE T RAP HANDLER WILL 
i ¥SERVIC OR COAINGE IN SOFT BartcH REGISTER TRAP 
>#CALL WHEN MEPERA TING IN TTY INTERRUPT 
060574 022737 000176 001140 $CKSWR: CMP #SUREG, SHR S THE SOFT-SWR SELECTED 
060602 001104 BNE 15$ ::EXIT IF NOT 
060604 105 120334 TSTB asTKs ::IS A CHAR WAITING? 
060610 100101 BPL 18$ ::IF NOT, EXI 
060612 117746 120330 MOVE as KB -(SP) >; YES 
060616 042716 177600 BIC 8tC17?, (SP) ;;MAKE IT 7-BIT ASCII 
060622 021627 000007 CMP (SP), a? ::IS IT A CONTROL- 
060626 001300 BNE 2s i; TF NOT PUT IT in, THE TTY QUEUE 
33 extt 
REARS RKSSLAERSSRKAALSKKAARKSKSSESRERERSERKERERERERSRRSRRKSRRERLEEE 
i KCONTROL Is PASSED I TO THIS PO POINT FROM EIT R ue TTY Y INTERRUPT SERVICE 
*#ROUTI SuIToH REG GI ISTER A RESULT OF A 
: CON TROL —G BEI AND No He oon REGiSTER FING SELECTED. 
060630 123727 001134 ooo001 és: MS auTOR. bi ;;ARE WE RUNNI NG IN AUTO-MO 
060636 001674 23 ::BRANCH IF YES 
060640 005726 TST (SP)+ :;CLEAR CONTROL -G OFF STACK 
060642 004737 060332 JSR PC STKINT >: FLUSH TTY INPUT QUEUE 
060646 005077 120272 CLR astks i; DISABLE TY KEYBOARD INTERRUPTS 
C69ES2 112737 OGOOOO! 001135 MOVB #1,SINTAG ::SET INTERRUPT MODE INDICATOR 
060660 1 1 4 TYP » $CNTILG ;;ECHO T ONTROL-G (?G) 
060664 1Bguot 061443 SGTSWR: TYP MSWR iG CURRENT CONTENTS 
060670 013746 000176 MOV gaReG -(SP) ;;SAVE SWREG FOR TYPEOUT 
060674 104402 TYPOC ::GO TYPE--OCTAL ASCII(ALL DIGITS) 
060676 1044C1 061454 TYPE , SMNEW ?;PROMPT FOR NEW SWR 
0607’ o00S046 19S: CLR ~(SP) ::CLEAR COUNTER 
060704 005046 CLR -(5P) :; THE NEW SWR 
706 105777 120232 7$: TSTB aSTKS ::CHAR THERE? 
060712 100375 BPL $ ::IF NOT TRY AGAIN 
060714 117746 120226 MOVB asTKB ;PICK UP CHAR 
660720 9542716 177600 BIC oe rtBs- (2 !MAKE IT 7-BIT ASCII 


On 


ee ere resmerecreresrisviteerilvelvelvalvelvelvelvelvelvelvervelvervelvelvilvelvelvelvelvelvelvalvelvelvelvilveneWslveNiMel seni N sii W i Ws oo 


bata 


DL CTRLR LGC. MACY11 30/1046) -NOV-77_ 17:48 PAGE 167 
EB Pi O4-NOV-77 13:2? ry INPUT ROUTI SEG 0167 
1 


14 
135 060724 021627 000025 9s: CMP (SP), #25 ;;IS IT A CONTROL-U? 

144 960739 091005 BNE. 19S ::BRANCH IF NOT 

ive be270e OB0Ode 208: ADD opt : TERORE PREVsOUS INPUT — 
i? Beoras B86 758 gr OG, ::LET’S TRY 4 AGAIN 

149 

1SO 060744 1 000015 108 CMP (SP), 91S ::1S IT A <CR>? 

151 060750 1022 BNE 165 +: H 

152 ooo004 TST 4(SP) ii YES) 1S It THE FIRST CHAR? 
1$3 060756 1 BEQ ll $3 H IF YES 

154 7 1 120152 MOV 2(SP),aSWR i: SAVE NEW 

Hee Seuss Pescat BBte3 He Pe Maat Hatta aes 

157 060776 1237 001135 oo0001 CMPB $INTAG, #1 + :RE-E TTY KBD INTERRUPTS? 
158 i 1 BNE 1S HE HI T 

158 : 06 000100 120130 ae Mov #100, aSTKS RE-ENABLE TTY KBD INTERRUPTS 
161 061016 7 0S7600 165: ISR PC, STYPEC >:ECHO CHAR 

16e 061 1 CMP (SP), 860 3; < Q? 

1 O61 Ooens0 BLT 1 : BRANCH F YES 

164 1 1 000067 CMP (SP), #67 *:CHAR > 7? 

122 Beibse Base22 ooone0 ye 1P8 (SP)+ £ NSMORE ASCII 

167 061042 005766 oo0002 TST 2(SP) ::1S this THE FIRST CHAR 

168 061046 001403 BEQ 175 : : BRANCH 

169 O06: 008316 ASL (SP) ;;NO, mare PRESENT 

170 061052 O06316 ASL (SP) :. 6S R TO MAKE 

171 0619054 006316 ASL (SP) +: ROOM WW ONE. 

172 061056 oO0S2é66 ge 178 INC 2¢SP) $iK EP COUNT OF CHAR 

173 061062 OSé6i6 ened BIS -2(SP), (SP) HE IN NEW C 

ize Deiose So44G1 001206 18s eyPE | SQUES eee CRS CLES 

176 061074 9000720 ¥ BR 20$ ::SIMULATE CONTROL-U 

177 DSABL LSB 

? 

123 5, SRRAEASSASLARELSAEASALLEARARKALAAHERLLERRLELASRSLLKAARARARLAAR KEKE 
18! j ATHIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 

183 : " ROCHR ;;GET_A CHARACTER FROM THE QUEUE 
184 te RETURN HERE :: CHARACTER IS ON THE STACK 
185 :# ::WITH PARITY BIT STRIPPED OFF 
187 : 

188 Belton Bieeee poo004 oooone SROCHR: MOV S26p3 StsP) 44, @. meena 

180 061106 O0S5066 o00004 CLR 4(5P)” ::GET READY FOR A CHARACTER 
igs betits 13746 061122 Abe eau. -(SP) beBUT NEW Pe ON "STACK 

193 O61120 RTI . ::POP NEW PC AND PS 

194 O6llee 64S: 

195 O6lle2 005737 060222 1S: TST STKCNT ;;WAIT ON A CHARACTER 

19% O€1126 601775 BEG 1 


Mis 
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beiaee TYPE SST TYIN St YPE THE INPUT STR 
ar af . 5 §G0 TCKUP neu SI ANScTER 


4g: TYPE gues 
BR 1 Higue AME BUFFER AND LOOP 
061420 3S: MOVB (R3),9S ECHO THE CHARACTER 


1420 TYPE 9 
SBacis CMP biS, (R3)+ sal CK FOR RETURN 
NE iLO F TURN 
177777 CLRB -1(R3) !:CLEAR RETURN (THE 15) 


SRER 

F858 
eee 

Nee WW 
rT 


a8 
g 


— 
_ 
rs 


CZRIEB.P11 O4-NOV-77 13:27 Y INPUT ROUT 
1 ll DEC ; DECREMENT THE COUNTER 
3135 Bel iss ease gat oooc04 MOVE TKOOUT, »4(SP) IGE ONE i CHARACTER . 
3330 B61 is6 89363 RERSSE 060331 ins ey enace’ 8 oe 8 bee oF THE END? 
3208 061186 060330 060326 nov aSTKQSRT, sTK@ouT’! HE INTER 
9204 ;  sassatfessussssssustousessssliessitressessnessnusnnensanseess 
350 :ATHIS. S ROUTINE WILL INPUT A STRING FROM THE TTY 
9208 - RETURN HERE i+ OESS STR NG ORO TRETER WILL BE ON THE STAC 
; ° ca 
is : ADORE RR TOR WILE Be A BYTE OF ALL O'S 
zit 061166 010346 SROLIN: mov R3 -(SP) ys: R3 oa 
asi5 BeitsS 893908 oeisee 1s: 8 oastrvin,R3 Ge Peas 
ais Bibs P5iGbe 061431 2s: MP agTTYINe7,R3 : | BUPEER TELL? 
i ise lel OF cers cay eer enmameeeee en on HE TTY 
3518 061818 146613 000177 10S: Cc 8177, trR3) Hy A RUBOUT 
ae es a BG Yebne rier maser 
9222 Oble22 112737 000134 061420 MOVB 8’\,9S he SLASH 
9223 061230 104401 Ob14e0 TYPE 9s 
as ies flecks | ss: BY BES BRL CRE SIRE *" 
9226 O61 5203 061422 : cnr R3, sSTTYIN i i STACK ENeTY? 
a5s8 ieee 1 z 1s no (83), 98 ii T 5 TYPEOUT THE DELETED CHAR. 
9230 1260 2s :}G0 ANOTHER CHAR. 
923 1 0057 Ss: TST (SP) 5 T KEY SET? 
35 i q } 4 pe Nac 
} 11 900134 061420 move #’\,9S >; TYPE A K SLASH 
Be tSa0 bbe aie CLR tsP) ;; CLEAR THE RUBOUT KEY 
061302 1ee713 oo0ces 7S: CMPB #25, (R3) 3318 CHARACTER A CTRL U? 
061318 ONO 061431 Y NTLU tt Ty 8 A CONTROL ye 
061314 BR $3 
06131 oo0022 gs: CMPB 2, (R3) $3 CHARACTER A “tR”? 
Bet - BME ds PtGLe "THE -GHBRACTER 
le : 
= 
06 
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ee ee ee ee ee 
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est H. 
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SSetRRTEReBouNOND 


NNIN 
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TororororururOrure 
Baez 


SERSaa vad aR sasaSRRTERSS 


RE PKES ERS ene Noe coe TREES 


go 
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001210 


14e2 


061614 


177770 


-NOV-77 rine PAGE 169 
ROUTI 


TTY INPUT 
TYPE SLF ;; TYPE A_LINE FEED 
TST topos $5 EAN T KEY FROM THE STACK 
nov (5P)+,R3 : ;RESTORE 
nov (SP), -(SP) ::ADJUST THE STACK AND PUT SS OF THE 
4¢SP 2(SP) 33 FIRST ASCII CHARACTER ON IT 
mov aSTTYIN, 4( SP) 
RTI ; ; RETURN 


: T FOR ASCII CHAR. TO TYPE 
TTYIN: “BLK BYTES FOR TTY INPUT 
NTL: . ASC /tu/<l 48> 33C¢ “ 
NTLG: - A Z /¢ 48) ch > ;;CONTROL “G” 
“are <15><12>7 
SMNEW: .ASCIZ / NEW = / 


NOOO 
SA 
243 


% 


ai READ AN OCTAL NUMBER FROM THE TTY 


Se te ES belek dh b5b-bidahehahehehabntebat-b-belab-tgh-ial-t-telad-teh 
5 ATH Ss ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND 


YPED 
A_CARRI RETURN-L INE THE _C ETE R MUST 
VPED. T RAINA BY TYPING A CARRIAGE RETURN. 


aT NPUT TERS WILL BE CHECKED TO I THEY ARE LEGAL 
+ LOCTAL IGITS. I ER LEGAL CHARSC R IS READ A “?” WILL BE T 
*OLL D . NUMBE 
N T 
Ls: 
T 


#T HE INPUT IS 
‘a, AD AN OCT R 
i URN HERE Hae ORDER BTS Re ON TOP OF THE STACK 
te : ;HIGH R BITS ARE IN SHIOCT 
SRDOCT: MOV (SP), -(SP) ; ; PROVIDE € FOR THE 
MOV 4(SP} ,2(SP) i ANBU 
MOV RO, -( SP) ::PUSH RO ON STACK 
MOV R1,-(SP) ;;PUSH R1 ON STAC 
MOV Re’ -(5P) ::PUSH Re ON STACK 
1S: ROLIN i FRE AN Z LI 
MOV (sP)+,RO ::GET ADDRESS OF 1ST CHARACTER 
ce | {CLEAR DATA oro 
2s: MOVB (RO)+,-(SP) ;;PICKUP THIS CHARACTER 
BEQ 3s ::IF ZERO Ou 
CMPB #0, (SP) ! MAKE SURE THIS CHARACTER 
BGT 4s ::I1S AN OCTAL DI 
CMPB 8’7, (SP) 
BLT 4s 
ASL Ri 3; #2 
ROL Re 
ASL RI 7304 
ROL Re 
ASL RI 5; #8 
ROL Re 
BIC wtC7, (SP) ;;STRIP THE ASCII JUNK 
ADD (SP)+,R1 ::ROD IN THIS DIGIT 
BR 2s ; ; LOOP 


—-ODD NOU £Wwl-O 


OOo 
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Sn 
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pv ipererancnyi 
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OO bb be be be pe a Be pe 
bb be be pe pe pe 


RRRSGSRERBOR 


SREB aCe 
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1 
1 
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1 
1 
1 
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N 
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tu 
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Y}1 30( 1046) NOV-77_ 17:48 Pi 17 
2? READ aN GN oc TAL NUMBER FROM Fue TTY 


001206 





3$: T ul arte ; 3 CLEAN 2 FROM STACK 
MOV R sShigct * 
MOV (SP)+,Re Ha a. 
MOV ( )+,R1 4 
rey (SP)+,RO 
4$: TS -}° PART MA al STACK 


aa wt 


(Fy | 
SS: TPE 0 THe ste ce 
BD ye “ at 


Ss Save. AND RESTORE RO-RS iii en 


(om 2 gpnnncammqunes tenes nnamapmsntettaaitaantrok te hecegninattin ite 
ynmee P 
; SUPON TURN FROM SSAVREG THE STACK WILL LOOK LIKE: 
i STOP---( +16) 
j# +2---(418) 
:# +4---RS 
fe 3B---R3 
i Selo---Re 
3 #+1le---R1 
;#+14---RO 
SSAVREG: 
MOV RO,-(SP) 33 RO ON STacK 
MOV ee ) $3 Rl ON STACK 
MOV » 7 (SP) 33PU ON STACK 
MOV R3,-(SP) 33 a oN TACK 
MOV RY, -( SP) A RY TACK 
MOV RS, -(SP) $3 RS ON STACK 
MOV ta). =< ) 35 OF RAIN FLOW 
MOV (SP)'-(5P) HH OF MAIN FLOW 
MOV (SP),-(SP) ;;SA OF CALL 
fey (SP), -( SP) ;;5A PC OF CALL 
;#RESTORE RO-RS 
; CALL: 
: RESREG 
SRESREG: 
MOV 1 4 (SP) 33 T PC OF CALL 
MOV (SP}+, 22( SP; $3 T PS OF CALL 
MOV (SP)+, 22(SP) ss T PC OF MAIN FL 
MOY (SP)+, ) 33 T PS OF ‘6 FLOW 
MOV (SP )+! :!POP STACK INTO 
MOV (SP3+,R4 33P TACK INTO RY 
MOV (SP)+,R3 ;;POP STACK INTO R3 
MOV (SP)+,Re ;;POP STACK INTO Re 


CZRIEBO 
CZRIEB. 


soapepeaaeenesmeaeeaett 


3S 
w 


Say reriyy 


f 
R 


Bee 


ereeeeesees 


OWONOWS wero 


Pi 


r CTRLR LGC 

061714 012601 

Belz & 012600 
1720 00000e 


062010 


MACY11 3011046) 


O4-NOV-77 13:27 


oosois ossci2 dees3e TITLE: 


C14 


OE ONS he {73 48 
SAVE AND RE STORE RO-RS ROUTINES 
a (SP)+,R1 POP STACK INTO R1 
(SP)+,RO ;POP STACK INTO RO 


-SBTTL Ril DECODER 
[povgtonegenosuoestpesvoatensensventeorr rs ta star TaTmctt 


ATH sa ust 1}Fo Wy LL Pr KUP THe 1hghee I OF THe oe “TRAP” er abt ennust ON 


1385 TOTTHAT ROUTINE. NEN USING THE §§ OBTAINED IT WILL 


STRAP: MOV RO, -(SP) VERO, 
mov 2(3P),RO $5 Gey" TRAE ADDRESS 
nove (RO), RO Be RIGHT Byte OF TRAP 


ASL ;;POSITION FOR INDEXING 
ey altars ae $3 xX TO TABLE 
RTS 0 


33 TI 
;; THIS IS USE TO HANDLE THE “GETPRI” MACRO 
STRAP2: MOV (SP), -(SP) ;;MOVE THE PC DOWN 
MOV 4(SP5,2°(SP) i HOVE THE PSW DOWN 


;RESTORE THE PSW 
-SBTTL TRAP TABLE 
Say ONTA THE lagna NG ADDRESSES OF THE ROUTINES CALLED 
Y THe TRAP INSTRUCTION. 


19) 
R 
H 


SEG 0171 


LEADING ZEROS) 
NG ZEROS: 
AST CALL?) 


AD 
ING 
L 
SIGN} 


SOF T-SWR 


; ROUTINE 
$TRPAD , WORD TRAP2 
T ; ;CALL=TYPE TRAP+1( 104401) TTY TYPEQUT ROUT INE 
TYPOC 5 ;CALL=TY RAP +e (1 Be ocT aL R (WIT 
TYPOS eaten. TRAP+3( 1 .~s Oc TAL R (NO 
T ALL=TYP TRAP +4 (1 s.. R ( 
TYPOS ALL=TYPOS TRAP+S(10440S) TYPE DECTHAL NUMBER ( 
SGTSWR greens TRAP+6( 104406) GET SOFT-SWR SETTING 
KSWR ;;CALL=CKSWR TRAP+7( 104407) TEST FOR CHANGE IN 
HR 5 CALLS HR TRAP+10(1044910) TTY T IN TER ROROUT INE 
IN 3;CALL N TRAP+11( 104411) ry T TRI Set TNE 
T ae T TRAP+1 CI 41 ) ger NUMBER FROM TTY 
G ;:CALL= g TRAP+13(1 ) SAVE AO RS ROUTI 
6 }:CALL=RES: TRAP+14(1 aia) ORE RO-RS ROUTINE 


5 5 SE Ae A ae a aaa aaa aaa EEE 
-S8TTL TELETYPE MESSAGES 

5 PPPS eeS PSSA SSESEL SSS LEAASAREAERARAREAE SERA RARE RAR RE ERLE TEES 
-ASCII <CR><LF><LF> “22-CZ2RJE-B/<CR><LF> 
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7 
TELETYPE MESSAGES SEG 0172 


.ASCIZ @RPO4/S’6 DUAL CONTROLLER LOGIC TEST - PART 1a<CR><LF> «LF? 









ENTERA: .ASCIZ <CR><LF>/ENTER DRIVE ADDRESS: / 


AORERR: .ASCIZ INVALID ADDRESS’<CR><LF> 


PORTRIS: .ASCIZ <CR><LF>/PORT A ADDRESS IS: / 


ZEZER EGRET 


PORTBIS: .ASCIZ <CR><LF>/PORT B ADDRESS IS: / 


¢ ee 


NOCLOCK: .ASCIZ <CR><LF>/SYSTEM MUST HAVE ‘L’ OR “P’ CLOCK/‘CR><LF> «LF: 


TESTNO: .ASCIZ <LF>/ENTER TEST @: / 


BADNO: .ASCIZ /INVALID TEST NUMBER’<CR><LF> 


TSTERR: .ASCIZ / ERRORS/<CR><LF> 
ADDORIS: .ASCIZ <CR><LF><LF> “THE PRESENT ADDRESS OF THE RH11 ‘RPCS1) IS: 


SECRRIERS BARORRDR TRS CBR EEE: SSB SRRTER RENOIR” 


L222 
aIn~d 


NTRHL1: .ASCIZ <LF>/ENTER NEW RH11 ADDRESS: / 


222 
ue 
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TELETYPE MESSAGES SEG 9173 


5 5 PHRASES SAAEAAAAAEALAARASAAALARAAA LARA AAAAAAAA ASA ERASAAAARAAHASAS 


-SBTTL TEST ERROR MESSAGES 
5 RRR EEE E REELS EEE EES EE SEES ERAAE SERRE E SEES SEE ESSERE EE SEE ES 


020107 EMI: -ASCIZ /WRONG DRIVE TYPE/ 


O4eSe& «EM: -ASCIZ /ORIVE NOT ON LINE/ 


EM3: -ASCIZ /SERIAL NUMBER READ THROUGH EACH PORT NOT THE SAME 


2eSe6 «EMH: -ASCIZ /ORIVE NOT SEIZED BY PORT’ 


EMS: -ASCIZ /WRONG STATUS SEEN BY THE SEIZING PORT~ 


a 

£70 
Eee 
Ronn 


Enon 


3 EM6: -ASCIZ /REGISTER CONTENTS WERE SEEN BY OPPOSITE PORT - ORIVE WAS SEIZED 
3 
0 


EM?: -ASCIZ /REGISTER CONTENTS WRONG AFTER RELEASE OR TIMEOUT- 
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TEST ERROR MESSAGES 
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a ax 
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Ww 
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a wn 
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= 9 be a 
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o7 T3se>) 7 TEeT ERROR MESSARES 


SEG Cl 


7ATTN BIT WRONG AFTER RELEASE - REQUEST SET’ 

ZATTN BIT WRONG AFTER RELEASE - REQUEST NOT SET/ 
/DRIVE NOT SEIZED WHEN ATTN BIT FOR PORT CLEARED’ 
/ORIVE SEIZED WHEN ZERO WRITTEN IN ATTN BIT- 

/DRIVE NOT IN NEUTRAL AFTER TIMEOUT - REQUEST NOT SET 
“TIMEOUT CLEARED THE ORIVE’S ERROR BIT’ 

/RELEASE COMMAND RELEASED ORIVE WITH ERRORS SET’ 


ASCIZ 
ASCIZ 
ASCIZ 
-ASCIZ 
ASCIZ 
ASCIZ 
ASCIZ 


EMe0 
EM21 
EM2e: 
EM23 
EMe4 
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az — ee mung ot ttt ST tt T--1) - oat 
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eg wt 
4146 O42040 
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41 
Bessas ose 
064210 145S 
064216 

4224 1 

4232 043511 
064240 051104 

4 18 

4254 

4 101 
064270 051105 
064276 O40S0S 
064 1 
pels le 

4 14 


064325 l2e 


4 O04. 
Get PII? 
Doses Bisse? 
064362 7 
064370 
064376 0OS1440 
nn 104 
ey | 0S1440 
4416 020104 
Wu OY 10S 
064432 1440 
fens Pls 
bh ES oh 
ne Peer 
Dew7) OuPele 
064500 0OS1104 
0O64S06 047111 
O64S14 sist 
B95 GREIDe 
4 440 
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TEST ERROR MESSAGES 


Emes: 


Em26: 


EMe2?: 


EmM30: 


EM31: 


EM32: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


“TIMEOUT ONE-SHOT DID NOT RETRIGGER’ 


/DRIVE NOT IN NEUTRAL AFTER RELEASE - REGUEST NOT SET- 


/REGISTER WRONG AFTER RELEASE WITH REQUEST SET’ 


“DRIVE SEIZED BY RELEASE COMMAND ISSUED WHEN ORIVE IN NEUTRAL~ 
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10066 0012 OTS: .WORD  TSTNUM, SERRPC,PTNBR, SBDADR, SGOOAT , SBOCAT ,O 

3 a 

1078 1 DT6: .WORD TSTNUM, SERRPC, OPPRT, SBDADR, SBODAT,C 

18078 ii DT7: .WORD TSTNUM, SERRPC,SEIZPT,PTNBR, SBDADR , SGODAT , SBDDAT ,C 
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10083 97954 000 000 OFi: «BYTE 0,0,0,0,0 

10100 9705 00 

1 193 07054 000 OOO OFS: .- BYTE 0,0,0,0,0,0 
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= 
Bitps = pBo0so 
BITOS = OOOO4O 
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BITO7 = 
8ITOs = O00400 
BIT). = opdboe 
= 
8IT1O = OO2000 
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= 
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BITS = QO0040 11778 

BIT& = 000100 11768 

BIT? = O000e00 11758 

BITS = 11748 

Baty = 11738 

SPTVEC= TN 128 8 ‘ 

CHANGE O02 390 2066 

CHGAOR 001276 15788 1937% 1939# 2066 2068* 

CKCLK OS6444 2026 2039 86118 

CKCLK OS6514 8611 r 

ES Geese aoe 

Eke 001244 tt 1 2l4en 2144 2150 2163 2165 2174 2187# 2191 2204 2212 222S% 
2227% 2 4s 7% 9# ex 1S# 823% 827% 2840# ss essss# 2867*# 

PY * % & 19% 1* & Soe osSs* 3ee4* 3e37*% 3e41# 32eS4# 
3369 * Ld at # 366S# 3669 * 369S*# 3708 37128 3725 3856+ 
3869 3873% * 3899 391e# 3916# 4039 40S2# 4054 40S9# 40728 4074 
4 £ sobe 41738 4186% 4o40e 4 * Yess y * 4273% 75 4297# 43102 43744 
4387# 4439% x 44sy 44S9# 4472 yYy74 4 +t 4SS1# SSs# 45684 4910# 4923+ 
49278 49408 ls S10%# 108% Slels S2eS6# S269# S40S# S416 5563 SS71# ss 
S7Se# S760 | S933# # 6039 6308* 6321# 7% 6335+ 1s 6354 
6413 6426e 6510 6523 65378 6543 6S556# 6615S * 66964 6709# 7 
6726# 734% 6738% 746% S# 878% 68952 ot &907# 651S# 73128 732eS* 
7333% * % 73% 481s YOu e 14# 7?eck 7318 7739% 77462 77Cls 7328# 
73936# # oaeae 73962% 7970 8293 8301# 8303 8313 8321 8323 84584 S4EE# 
: 8468 8478s 8486 8488 

EeSer > heeete Beige eases 

CLOCc 

CLR = 000040 1228s 2146 2167 3688 3892 4090 4291 4S31 6714 6883 

= 7 9420 9423 9432 9437 9441 9445 9449 94s3 9463 

*“ amas aces” d3¢ $840 $8e2 9977 9989 19000 10009 10028 10040 

CRLF = 000200 10988 8848 8887 

CSF = 000002 13608 13788 

CSU = 000010 136e8 13808 

DCK = 100000 1e968 

BCL = 000100 14208 14298 

DCU = 000001 14268 

OCISP = 177570 11048 1526 1966 

Bet20 = popodS 153s 

= 
Beh, Groees ig 18S) afRee THE tN 87S 180m s0nnse 
1 4 1 

peas Boag 16/3 1233 mig # 1751 1773 1794 1801 1808 1815 1822 101088 

OFS “70547 1638 1645S 1689 1680 1687 1787 1885 1892 1899 101018 

ree artel ig? 181188 

BE Se 070555 1631 16S2 1694 1701 1708 1766 101038 

OrH1 1608 1615 1827 1862 99038 

OH11 067176 1664 99SSe 

Bubs Be ae> i527 «= t5e5 SPP 4888, «1897 58m 

Ores O674E5S 1554 1741 1834 1876 1904 99898 

DHE 067565 100008 

oH3 C&E605 lé2e 99108 

OHSi OE7ESS 1778 100098 
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DH36 067743 1671 1713 1720 1749 1771 1792 1799 1806 1813 1820 100218 

OH4e ses; i l isan 100258 

¢ 

Beas 88001 igee .dosee 

DHY6 070107 1869 100408 

DHS 0867 1636 7 1785 1890 99328 

OHSS 0 tai 1 r] 

OHSE Be 192 1 a 

‘te 7053 is. 1692 1699 1706 1764 99408 

DISPLA O0i1142 1 8 1966# 1974*  8716# 8738% 

DCISPRE 000174 147S8 1974 

DLT = 100000 12388 

se: SB et 

8 = 

DPR = 900400 12708 2231 2263 2353 2415 2590 26S2 2831 2871 2905 3010 3050 3084 
3179 S6 3536 3632 367 3716 3739 3836 3877 3920 3943 4125 
4326 4630 46S3 4752 4775 4889 49S6 5070 5137 S241 5287 5390 5326 
SS43 5s3s S732 S784 581s 5937 5960 5991 6043 6066 6097 6192 
6767 6936 7065 7202 7362 7510 7637 7668 7851 7882 80s. 8166 8340 

DRG = 004000 13338 

oRY = 900200 le698 2231 2263 2353 2415 2530 2652 2831 2871 2905 10 3050 3084 
3179 3224 3536 3 3673 3716 3739 3836 3877 3920 3943 4125 
4326 4630 46 47 4 4 4956 S070 5137 4) 87 $390 S436 
SS43 ss9s S732 5784 581s 5937 5960 5991 6043 6066 6097 io 
4 8338 706S 7202 7306 7362 7454 7510 7637 7668 7851 7882 go0se 

DSWR = 177570 11038 152s 1965S 

OTE = 010000 12938 

Orsy = 900200 13068 

Oroo = goood! 13248 

D0T01 = o0000e 13258 

RTRs = 000004 13268 

DT = 000010 13278 

DTOo¥ = 900020 13288 

o7Tos = OOO004C 13298 

OTo& = 000100 13308 

DTO7 = 000200 13318 

pros P aha teas" 1616 1665 1863 1905 100658 

OT13 070374 1644 1679 1686 1884 1898 100778 

OTee 070412 1728 1758 100808 

BT23 070424 i73S8 1742 1828 1835 1877 100828 

DT3 070306 1653 100678 

bre oFpNee 1569 i338 1593 180 1814 100868 

aki 070462 16/5 1714 17e1 1ges 1821 100888 

THe 070472 184 1849 100908 

CT46é 70500 1870 100918 

ors 070322 1637 1658 1786 1891 100698 

oTs4 0 le 1912 100938 

DTSs 070524 1919 1900988 

OTSE 070536 1926 100978 

ore 670340 100728 

OY? 070354 1630 1651 1693 1700 1707 1765 100748 
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Dva = 004000 12588 
ECH = 000100 12878 
ECCI = 904000 14018 
EMTVEC= 000030 11928 19S1# 19524 
M1 ? 1607 948Se 
m190 1 1 gey r 
13 1 1 468 
1 321 16 9SSé8 
EM13 063267 1677 9S648 
EM14 063354 1684 95748 
“1S 063417 1691 95818 
M16 063476 1923 2g 
M17 06355 1708 998 
Me 06251 1614 94898 
EM2e0 063630 1712 96088 
EMel 063710 1719 96178 
Briss 063763 1726 96268 
EMe 064050 1733 96368 
EMe4 O64116 1740 96448 
EMeS 0641 1748 96538 
EMeE 064240 1756 r 
EMe?7 06432S 1763 96708 
EM3 41 l6e1 S494e 
E30 064403 1770 96798 
EM31 064 1777 96918 
EM32 O64sss 1784 97008 
EM23 O64 1791 97088 
EM34 064730 1798 97208 
EM3S 0&S033 1805S 97338 
EM36 O6Slle 18le 97428 
EM37 065164 1819 97508 
EMYo 06Se3e2 18e g7see 
EM41 065307 1833 97678 
EM42 065351 1649 97748 
M43 437 i 7858 
aby 23? 18S4 7348 
M4YS 1861 38 
EM4E S6 1868 les 
EM47 065717 1875 98208 
Ems 062654 1635S 95108 
EmsO 066005 1682 98318 
EMS1 ce 1889 ls 
Fras is 
c 1 190 8 
Emcy 066 1910 98738 
Emss 066425 1917 9684s 
EMcSE 066472 1924 98928 
EME 062722 16ns 95188 
EM? 302 164 95308 
ENTERG 10 1991 94328 
ERR = CO 12768 63l1le 6514 
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7940 734s 7 ie bie Gi* 9294+ 8298 8314 8319 8355 
Baeis B36 B37 : Bases Bue Barge Sues) «Beads 6 BSaee | GSaHe «6 8539e «10065 «= 10067 
10069. 10072 10074 10077 10082 
4Se 874] 8761 9074 9263 
Hava 57644 geese Ba536 8870 8879 8884s 
Hane Bas ABe 1038 re a 1943 1951 19S5 1956 1957 
C41 = 1 
Sinz = Soooue 15378 «= 15388 


G16 


cZRTEBO DL CTRLR LGC MACY 11 30( 1046) -NOV-77 17248 PAGE 202 
ESRIEB.P11 O4-NOV-77 13:2 CROSS REFERENCE TABLE -- USER SYMBOLS 
$cm3 = 000001 15358 1837 
m4 = 90000S i 8 5398 iS4Os iS4is iS42e 1543s 
SCNTLG 061436 1 4e 
SKNTLU Bal sah 73 3578 38 
001 1S478 16 20 2072 gSee 8749 8761 8769 e788 87923 ge13 
9156 $243 3263 9323 
SOBLK 060312 8988 gees 90308 
SDORGN 056434 BSb8 J 95358 
SEA OSb4e4 1484 geste 8756 
SENOC OS6e2 19SS 65708 
SENULL OS644O 8s38a 
SEOP OS6224 82093 esss 
SEOPCT OS626e2 19SS# 85678 8S$71 
SERFLG 901103 12585 8667 91 a69 99% 98720 8736*# 98761 
SERMAX 1115 15148 1958 ye 869 871S# 8720 
Saree 937 SE att 85 : 744% 8745 8761 8775 10065 10067 10069 10072 10074 
ides i Bogs Boge 10088 10090 10091 10093 10095 
SERRTB 001304 1 6 Boe 
SERRTY OS7254 iS8 8 7688 
SERTTL OOllie iSles 8583 gS87* e8742e 8761 
SESCAP 001200 15448 19578 8714# 
SFILLC 001156 15338 88S6 8887 
SFILLS OO1155 1s3e8 8887 
$GOROR 001120 15168 
$GDDRT 3501124 18188 2133 136 2140 gis" 1$7 2161s 2178% 2181 2185 219S* 
ssig* § 193 sce" as s3g* 24g 5 a 2263 2cb6 
Sees . * e ios S235 158 4S ah. s28)8 S206 
2874 25760 #* # 10% $873 3017# 4% 
30S0# & * 114 20 3179 3215 J228% 3e31 
sGa8 £ 2 4 3 76 * 239" 3393 3397% 
34 # 32% 363 3656# 3689 
3676 PY ta 7 706% 16# 32 g 723% 3739% 3771 
3836« Te * * * *  3903% 
3923 7% 3943" I *  4O4%6 40SO# 4063% 4066 4070# 
41078 44ieSe 41S 4 177% 418 41g4e 4yoGe 424 4251% 4eo4oe 
4301# 4 4308% 43cb# 4364 4378% 4381 y3eS*# 44438 4446 
4466 44708 44ES@ 4516 1 YSY2s 4S4 YOoNg4e 4SS9# 45S * 
46308 4631 Yo 4653 4 & 4 47S28 475 47S7 
4811 48894 4914" 4917 49eix 49318" 4 4938% 4987 
2993 So9S# pg ise 13 19% 2432" 5168 173 S232e% 
i) § 41 cies 598 ce? 47 j iS. SY ‘ 5s44 eeug. 
& 
ss9Se# eet * Ss 705% 2334 23335 : $737 S7S6# 
$739 581S# S8si S937 2fo8 co4ue 960# sa s991# 2 
O46 * # 6081 6097# 61 6133 6192 622 6228 631e% 
6321# 6 & b3ug bee 6365* 6397 64 6417% 6420 6424" 
6Sel# 6533 6534 6547% 65 6554 6567# 6S 660S 6619# 6622 
6703 67078 6730# 6731 as 6743 767% 7398 6803 6869# 6872 
6300 691 * 912 69364 : 697 065s 096 7101 72028 723 
7319 * 733 * 7340 344s 73608 739 7398 744% 7467 747 1% 
74928 10# 41 7546 76378 76 7668% 7699 7704 7198 7719 
77528 7753 78Sie 7866 7B8e# 7913 7918 79328 7933 79492 7950 
g025* 36 g0S2* 8084 g090 8139+ 9150 Si66e 8198 9204 8297% 
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CORIJEB.P11 O4-NOV-77 13:27 CROSS REFERENCE TABLE -- USER SYMBOLS SEG Cette 
18338 8340# 8371 8376 846e% 8463 8482*# 8483 esos 8536 8s41 10067 10069 
SGET42 OS6414 8ssse 
TSWR O60664 rt 9405 
* Boreas ig 
OcT 1624 11s es 
SICNT 001104 1S098 Ox 8706# 8707 8709# 87193 
SINTAG 001135 1S238 9126# 9157 9269 
SITEMB O01114 1$138 874S# 8761 8772 
SLF 001210 15488 8761 8887 $253 9263 9323 
$LKCSB O0i2e14 1S$S38 8617 
SLKCSR OOlele2 15Se8 8613 8618% 
Scivec bo1see ieees 8635 ‘ 
C 
He 001106 1298s eSe2. # 2118 2316 2SS3# 2791% 2970 3146# 3291 34344 3514 3605 
Qs 4O14s 4215# 4414" 4S9e8 47 14% 4YB44s S02es* 5203# S352 SSOS*# S694 Sssd*# 
S93 ocree os ~ a oe* 7139% 72794 7427 7S58S# 7799 8002s 8iibs 
ghee & s 
SLPERF 001110 8 * #* 119# 2317 S4¥# 27928 * 47% * 42S # * bs 
Aside § dah@s SBi8s Gales G2kgs « GS7es | SQUES EgfeSekcGs eSe52 edges «| eekes | (eBRPt 
6160 6257% 64S9# 6668 6837# ra a 7140 7280 7428 7586+ 7800# 8003 80e8* 
8117 8142s # B4lee 8697 8713 8719 
$LPVEC 001216 ta3te 8614 
SMAIL = #eeeee U 1977 1984 8712 8751 8840 
0614S4 9132 92678 
os 061443 $129 9etSe 
SMXCNT 957120 8710 87198 
SNULL_ 001354 1S3is8  988ss 7 " + 
SNWTST= 009001 20988 2100 ecsis 2293 eSe8s 2530 2766s 2768 29478 234 31278 3129 32728 
3274 34188 253 34988 S00 35738 3581 37838 3 39288 1908 4192 
43938 4395 45738 s 46958 697 48188 48 49988 51808 5182 S329 
331 S4798 SY S668 5670 Sssses 860 61408 614e 62358 623 64378 6439 
664 8 69798 6981 llés 8 7esss 7257 74048 7406 SS3s 
ss 77678 69 73828 7984 80968 0 82188 220 83838 8385S 
SOCNT 060072 891 89618 
SOMODE 060074 89144 8918 8923 8926 8937 89638 
SOVE 057104 8678 8708 a 8 
$PAsS 001100 15068 4 3a 8S64« Sés+# | TA 8s98 8704 8720 
SQUES 001206 1S468 61 8887 317 246 3263 9320 9323 
SROCHR 061076 9188s 94 
SRODEC= ##eeee U 9411 
SROLIN O61166 Sells 94093 
SROOCT O61466 3284e 9410 
$ROSZ = 000007 3204s 
SREGAD 001160 15358 
SREGO 00116e 15378 
SRESRE 061664 $3568 9412 
$SRPAOR 001300 13888 2037 2070 2077 2080 2096 19097 
SRFPVEC 001302 15878 
SRTNAD OS6436 85978 
SROA = aeenee U 9413 
SSAVRE 061626 $3408 9411 
SSCOPE 056670 1949 867Se8 : - - 
SSETUP= 000127 19318 1948 1949 1951 19S3 19SS 1956 1957 1959 1981 gS62 8676 9734 
e754 e756 9066 9071 9072 910e 9269 
SSTUP = 177777 19318 
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CIRIES.P11 O4-NOV-77 13:27 CROSS REFERENCE TABLE -- R SYMBOLS 
STMP1 001166 15398 s35* rs 6252 fora" ess 305i 438 ai" as te se 
cb6 + 
502 535i iss $343 $347 i 4% 3038 3543 44e  3S4S 
ses" 36348 36. 3746# 3747% 3762 7% 3938" 3840 a 39S1# 
966 41328 4133 4134 4148 4 & 4334" y 434 HY Gog YNQds yyy 
4631 4660% 4661% 76 47S53% 447S54# 4756 47822 4783 
cage 4963 4YOG4s 496S 497 144% 14S# 2180 Y¥ S243 
S2e9s*# S2e% 2310 ls e935* 4438 Que 44s 4S SS44*# SS4S# 
S633# *  S6 49 33% it % pees" S824 5838 $3984 
6000 14 6104# 6105* 6106 eh 32 1 6215 6372% 6373 
6388 5 74% S7S# 576 530 4 5 * 8 76 509 ak a 
70728 3* 74 209% e49* ell 2 369% 370% 371 7 
7518 19 767S#* 7676% 76 7691 7890# 7891 7390S 6s 
g035 80S9# *  g06 140% 141% 8149 8173% 8174 8175 8189 
ms 8348e 8349 Soi * 8513 14 8 
gTMP2 901170 Lange 2417% e418 4 444s > 2654s e658 ge? $873. esas 
sa 37 ae Sate. Se" Se, TP, OY 
37708 3771 aqqee | 3840 3373 Shae «378 Sieee S28) 4G40 
41S6# 415 43288 4329 4341 4355 4357# 4 4487s 4488 4500 4514 
465S# 4656 4668 4Y6SY 4777% 4778 4806 4958# 4959 
4985 4987 Si39% S14 5152 5166 5168 5290 5302 5316 $318 
5439 5451 eces S pBse S629 peda S6sS 5657 S817# S818 5830 
846 $9934 3994 6022 * 6100 61lle 6126 6128 6194 
6207 6221 23 6367% 6368 6380 6394 6396% 6397 6569% 6570 6582 
6598* 6599 6769% $$ 6770 poke ta | 6298 938% 6939 6951 6965 6967 
7068 7080 7094 # 20s 217 231 7233 7364# #7365 7377 
7393 7Slee 751 75839 fa ag | 7670% 7671 7683 7697 7639 84% 
7897 7911 791 4#  g0SS 806 8081 g083% 8084 8168* 8169 8181 
* seta meade 8197# 98198 8342 8343 8355 8369 8371 8S07% 8508 8Se0 8534 
g7MP2 00:172 1S418 e2421% 22 3 48 e4S0# Sc3A Sse 2659 2673 2685 2687 
egll# e29le * e2H1 # 1 31S 3117 3119% 3120 
31 3200 le 14% 1S 3330% $3331 3357 3359 34628 
3477 3489 a3)" 3492 4en 3543 3557 3569 3871#% 3572 374S# 37 
3774 3776% 3 3949 3950 3964 3978 3981 4131# 4132 4146 
4162% 4163 43328 4 4347 d3e} 4363% 388 4491% 44492 4S06 
4659# 4660 4 4689 4781% 44782 4796 4809 4811 49622 4963 
4990 cues S143 144 2328 a2! af3 S293 5308 S3 23 
S443 S4s S470 472 Jex 633 4 S662 S8el# 5836 
58s1 59972 5S 601 p0s3 6027 6103% 6104 6118 6131 6133 6198# 
6213 6226 esse l1#* 63 6386 6400 6402ex 6403 6$73 6574 6S 
6604 6605 6773% 6774 6788 6801 3803 694e# 6943 6957 6970 6972 
7072 5093 $h 1 7208* ee e53 7e 7238 7368% 7369 7383 
7398 16% 17 1 ye 7546 7674% 76 7689 7702 7704 7888 
7303 7916 7918 *  g0s9 8073 7 * g090 8172e% 8173 8187 
* otal 8203% 8204 8346 834 8361 8374 76 8Sl1# 98512 6 3 41 
ZTME4 001174 1S4ee8 si2e* si33* 2140 4338 2160# 404 183% sio0" 218s 22e00* 2201 
ee2els eee 23 2236* 237% 2238 * eS4e ess 2268 2cb39* 2270 
2837% #2838 essli#  28Se# 3 2876 877% 2878 301S# 30168 17 3030 
3032 30SS# 3056# 3057 3233% 3234* 3235 O# 3251 3378% 3379 
395% 33 # 3397 l# 386 3663 3678% 3679# 80 3704 $3705 37 
afene 27a 3865* 3866# 386 3882# 3883* 3884 3908 3909# 910 392S* 
3927 4O48* 44O49# 40 4068* “C69e 4070 410S* 44106# 43 41822 4183 
4249e 44°eS0# 4251 4269 42708 4271 43062 #43078 $4308 4383% 4384" 4385S 
4449e 44450 4468% 44469" 4470 4S47% 44S48# 4549 4S64%  4SES* 4566 4919 
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MACY11 30(104%6) QO4-NOV-77 PAGE 206 
3:27 CROSS REFERENCE” ABLE -- USER SYMBOLS 
4921 4936# j#4937% 4938 100# si8h° 5102 S117% S118% 5119 S26Ss 
S414 re * S416 S348 eee” 4 = 6049s 6317% 6318 
63518 64eee b6423% 6519% 6S520% 6521 53 * 65534 6554 
Sees vA # # 1 ears S# 7321 sees 7323 73428 
pe O74 $6 il 20s es 229i 2309 3188 2319 2ese8 
essé BY Ext : 728 3373 3127 3139 
367, r Sig 427 8 37 | 3507 35168 
42178 4 ta. uy 440 44168 sais" 4 5 one 4so4e asa ueas 
a515 aet 8 48468 aoa? 4998 231 S0e7# 5180 5196 
2353 S4e at S479 Sygg SS078 paue S687 56968 
3 8 14 6152 pi9ie 6162 62 4 6eS8e 6259 
64608 pte} tt 66698 6670 6809 6829 68388 6839 69793 
700S 5448 cA § 1418 7142 7esS 2575 7e8ls 7282 7404 7420 
7553 878 7589 7709 776 792 78018 7802 7803 
7995 8004s 80396 8109 81188 8119 8218 39 82488 49 
84138 8414 101 
15308 Bare 
15348 88 8887 
15298 88 8887 
S3a78 4398" 
93918 94008 934018 94028 94038 9404s 3940S 94068 9407 94088 94098 
aur 94138 
15078 2117# 2315# & 2790% 2969 3214S 3290 3433 351 3604 
4214H 4413%  44S91# 4713# 4843" 4 at Se0e# 5351# SSOv# 5693 5879 
64S7# 66564 epaee 7001# 7138 727% 74e6# 7584" 7798 8001s 8115S 
gaeee 67 8711 8716 8720 8735 8738 8761 
14 geu4 9258 S2bes8 
geass | aaa1 
Ss 8862 3 8874s 8875 9161 
88se 88ese 
89178 9400 
16 89198 9402 
8Sles 9401 
308 
Boge tay 8927 89628 
4708 14748 1482 14838 14eS8 14678 15048 1549 1946 1989 1960 
2166 2464 2469 74 2479 2484 2489 2494 243g 2so04 
2524 2701 2706 271i 2716 e7el 2726 2731 2736 2741 
2761 3220 3365 40SS 4075 4256 4276 44ss 447s 4526 
6712 688 lle 7249 7307 74SS 4 07 832 B4ES 
8S7Ss 8s38 gsogea 8719 8720 8761 88168 8887 90308 39034 
30408 Sebes 9263 92698 9323 
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pala a 7 
i #E 
BE) . 3042 


cc 1 
Col 34 } 
CHECK A388 129 2150 174 2191 2212 227 2244 2es3 28is 2827 &7 3006 
3224 a 3386 Se 3669 3695 37 le 3656 Se 639 3916 4039 
40S93 4096 4 ‘ oo) 4297 4374 4429 44S 4538 Pes, 491 4927 ag 5108 
S256 s40S Ss Ss S 6039 $ (=) | wf 1 6413 6510 Se S43 661 bE56 
7 7 8 aces a 6307 7312 333 0 7481 7714 7731 748 328 7945S 7382 
CLRATA Osea G242 4718 4848 S S207 S356 S S839 segy 6163 6260 6426 B46e 6630 
S 667 6840 ; 7143 7283 7431 7589 7803 8006 8126 8255 B4is 
COMMEN 11978 
Do 45568 471 
Hoon fists SOs 
ERROR suan° s mH | sibe is 273 oSe 2239 se38 2271 gees pad 289 $309 giG3 
e520 o3e ay 33 Sey +] 598 Sees 2s S763 $309 e7ie2 2717 2722 
2727 Y, 737 742 747 75 Soes et 28s 2918 2931 
e337 1 18 ti il 116 glee 3132 3é1l 3217 
3236 2 3 3 33 wel ra % 303 34 3488 344 3549 
3562 3626 e4 752 767 3773 37793 3830 3843 
3868 4 3928 338 3971 4051 4071 4108 4138 4153 41SS 4165 
4186S EPS 427 43093 4 4354 4360 4366 4356 44S) 4471] 4Yy 4Si 4518 4S23 
4550 456 37 4 Be» = BEY —— 4759 4768 4 4813 4901 
4906 4922 49 4969 4 4 4 epee sos ae Si2d sis 5168 5170 5175 
5235 1S eS 53S7 4i ae S464 S469 S474 $537 
s$5c 7 $7; ] 4 3 S665 $726 739 s7s3 S766 S796 S861 
5828 5843 Sexe $8S3 §91 53926 2238 2358 5977 6004 6019 6024 60¢e9 6051 6678 
6083 6110 6125 6130 6135 6205 622 pezd 6300 6320 6234 6353 6378 639 
6392 6405 64eS 6 B25 6S 6555 6$95 6601 6607 6708 6733 4S 
67650 6795 6800 $8 $8 5 g3i4 6949 364 6969 6974 70S5 7078 7993 7098 
7103 7113 7192 721 230 2 240 7250 324 7345S 7375 732380 7393S 7400 7472 
7493 53e3 7538 7543 ae ra ep a 4 7681 2838 7701 7708 7721 7728 7738 F745 
77858 7863 78 7 1c 7915 73920 7335 7342 79Se 7959 739 7976 8038 
g0¢es g0sC 8ne6 8032 6iSe 8179 8194 8200 6206 8300 320 8353 8368 8373 8378 
e46s eyes esis 8533 8S38 8543 
ESCAPE i1S7s 
FF SeC7s S356 
FF SsS0Se 5696 
GETPRI 11978 
Semel °° 5 ca 
HEARD 10638 2111 2203 eS4é 2784 2963 3139 2284 3427 3507 3596 3802 4607 4208 4407 
4585 4707 4337 5018 S196 S34S S498 Sés7 $873 6iS2 6249 6451 6660 6829 6g3ss 
73s 7272 7420 7578 7792 7995 8109 8239 8404 
oe 61638 
II be6Ce 86bY4G2 
JJ 66718 684C 
«K 70068 7143 
Li 75838 7893 
ee 75898 7709 7923 
sane 72838 743! 
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CZRIEB. P11 O4-NOV-77 13:27 CROSS REFERENCE TABLE -- MACRO NAMES 


MMI 40188 4219 
MORE TA 4978 
s e949 ge ® 3129 i oe Ne 
5 e4gve 41 43528 64 23 
® $331 S478e 5481 S66 
® 664 6808s 6811 


“LER EE Eg a B 


76 
1 
7eS4e 7257 74038 7406 7$S2e 7555 77668 7769 79818 7984 8095s 8098 82178 


NEUTRA ies 3 eit - 73 Baie es 


é 
ie 
ee 


711 725) 7767 80%  ### 8218 8383 
NN ® 841 
00 ® 13 
Sor 11978 rv g 
REC EAS these 3167 3312 3334 3931 4113 4314 4641 47) 4879444 9 $125 
L } ng 

ses i4 7c 5973 675 924 7350 3988 7be7 


Eee 
2086 


£ 
_ 
- 
= 
-_ 


m 

; 

a 
rs Sat 


1 

Be 7] S750] 
7619 76 4 7659 7’ 7827 7833 7838 ? 78S4 7887 
8043 8143 81 7 8331 84 2 

SETATA 10638 4019 4220 4419 

SETPRI 11978 9191 

SETTRA 923918 9406 9401 39402 $403 9405 9407 39408 9409 9410 9411 12 

SETUP 11978 861941 

SKIP 11978 

SLASH 11978 

SPACE 11978 

STARS 11978 1198 1e44 1248 1441 ne 1480 1500 1S49 41580 1584 $33 
se 5838 SLD SHES SLES skh Seig SEL SMS SUES Sel SRY 
2 3 a3 3e07 588 3 35 3610 33 ; 47 ad #3 #1 ee ie 
3688 400 1 4034 4678 488 46 aris 416 3847 
4279 42388 4e 431 436 4393 4406 4418 4434 4478 4Se8 4$33 4$73 
+640 9s 4706 4730 4762 4818 4836 4871 4876 4 3998 S017 


———. 
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CZRJEB.P11 O4-NOV-77 13:27 CROSS REFERENCE ABLE -- RO NAMES SEG 0209 


ERRORS DETECTED: 0 
RMO3: C eases, Cee SEQ/CRF /SOL/LI:ME/NL: MC: MD: CND=CZRJEB.P11 
RUN-TIME: 


RUN-IN RAYS: 1 Bib/7228.7 


DO1 


